В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
krasotka505050
krasotka505050
03.08.2020 01:17 •  Информатика

Написать в паскале программу расчета значений функций y=x+5, при условии, что х изменяется от -100 до 100, приращение x=1. Результат расчетов выводиться на экран

Показать ответ
Ответ:
Mrmr56
Mrmr56
07.02.2023 17:22

73 и 74

Объяснение:

Предположим, что во второй кучке 73 камня (так как если S=<72, то мы получим выигрыш Пети, так как он может уменьшить количество камней во 2 кучке вполовину и выиграть).

Если Петя:

1. Уберёт из 2 кучки половину камней, то Ваня уберёт из 2 кучки 1 камень и уменьшит количество камней во 2 кучке до 36 и выиграет.

2. Уберёт из 2 кучки 1 камень, то Вася уменьшит количество камней во 2 кучке до 36 и так же выиграет.

3. Уберёт из 1 кучки 1 камень, то Вася тоже уберёт из 1 кучки 1 камень, и затем будет повторять ходы Пети, и Пете придётся начать взаимодействовать со 2 кучкой, и проделать с ней 1 или 2 вариант хода.

4. Уберёт из 1 кучки половину камней, Вася должен повторять за ним, пока Петя не начнёт взаимодействие со 2 кучкой и действовать аналогично

НО(относится к 3 и 4 случаям) Вася должен избегать случаев, где в его ходу были бы нечётное количество камней:

например изначально - (12, 73), Петя - (6, 73) и тут Вася должен сделать ход (5, 73), Петя - (4, 73), Вася - (2, 73), Петя - (1, 73), Вася - (0, 73) или

изначально - (12, 73), Петя - (11, 73) и тут Вася должен сделать ход (6, 73), Петя - (3, 73), Вася - (2, 73), Петя - (1, 73), Вася - (0, 73), и получается ответ 73, но если есть нечётное число 73, то есть и четное - 74.

S = 73 или 74

0,0(0 оценок)
Ответ:
1978dan
1978dan
11.05.2022 01:10

1.

const N = 10;

var a: array [1..N] of integer;

i, x: integer;

begin

   write('Введите x: ');

   readln(x);

   for i := 1 to N do

   begin

       a[i] := x + i - 1;

       write(a[i], ' ');

   end;

end.

2.

const N = 10;

var a: array [1..N] of integer;

i: integer;

begin

   a[1] := 1;

   a[2] := 1;

   for i := 3 to N do

   begin

       a[i] := a[i-1] + a[i-2];

   end;

   for i := 1 to N do

   begin

       write(a[i], ' ');

   end;

end.

3.

const N = 6;

var a: array [1..N] of integer;

i, x: integer;

begin

   a[N] := 1;

   for i := N-1 downto 1 do

   begin

       a[i] := 2 * a[i+1];

   end;

   

   for i := 1 to N do

   begin

       write(a[i], ' ');

   end;

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота