Вывести экран все четные значения в диапазоне от a до b

коротенко87 коротенко87    2   23.05.2019 20:45    0

Ответы
rona3 rona3  19.06.2020 17:14

program raf105;

var  

 i,a,b: integer;

begin

 write('Введите 2 числа (начало и конец диапазона): ');

 readln(a,b);

 for i:=a to b do

   writeln(i);

end.

PascalABC 3.4.2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика