Ответы на вопрос:
ответ:
program nextnum;
var
n: integer;
begin
write ('n = ');
readln (n);
repeat
inc (n)
until n mod 2 = 0;
writeln ('следующее четное = ', n);
readln;
end.
Популярно: Информатика
-
bezin200030.03.2022 06:04
-
Виктория4111628.06.2021 00:44
-
GizaHelinc09.03.2021 04:49
-
xodocovp0a3a728.11.2022 14:45
-
urukhaiz07.08.2021 05:35
-
JanoX03.10.2022 03:11
-
dianamakhmutova104.11.2022 02:13
-
Кристинаuy23.04.2023 10:20
-
sergey26024.03.2020 15:43
-
TemChik200717.02.2023 05:57