дано целое число а. выведите следующее за ним четное число. при решении этой задачи нельзя использовать условную инструкцию if
More Questions From This User See All
дано целое число а. выведите следующее за ним четное число. при решении этой задачи нельзя использовать условную инструкцию if
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
a:integer;
begin
readln (a);
repeat
a:=a+1;
until (a mod 2=0);
writeln (a);
end.