Короче,есть две команды: 1) прибавь 3
2) умножь на 2
Нужно из числа 1 получить число 47 используя эти команды.ответ запишите,указывая лишь номера команд ( наприпер,программа 21211 преобразует число 1 в 16)
Заранее большое ,а то я уже запуталась
285
440
Ответы на вопрос:
Var
n : word;
a, max, i: integer;
Begin
repeat
write ('N = ');
readln (n);
until (n>0) and (n<=1000);
write ('A=');
read(a);
if a mod 4=0 then max:=a;
while i<>n-1 do begin
write ('A= ');
readln (a);
if (a>max) and (a mod 4=0) then max:=a;
i:=i+1;
end;
writeln ('Max:', max);
End.
Как то так
переменная N отвечает за кол-во вводимых цифр
а А за сами числа. Для удобства поменяй имена переменных я так привык обозначать. Прогу проверял вроде работает. Надеюсь Удачи!
Популярно: Информатика
-
msganny29.06.2020 00:15
-
BlackGus00723.08.2020 15:30
-
leila32326.12.2022 03:02
-
ник503216.02.2021 14:44
-
salbekov20131.01.2021 15:30
-
123681113.09.2021 12:29
-
papulova0308.07.2022 14:39
-
Bakuninalexander16.06.2022 07:29
-
МОЗГ198719.10.2021 20:27
-
Veronicia10.12.2021 21:00