Выведите (через пробел ) все четные числа от a до b (включительно)

alliekw3p0144w alliekw3p0144w    1   30.03.2019 14:00    1

Ответы
тса2 тса2  27.05.2020 17:24

program test;
var a, b, i: integer;
begin
   write('Enter a, b: ');
   readln(a, b);

   for i:=a to b do
      if i mod 2 = 0 then
         write(i, ' ');

   readln;
end.

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