Вывести все четырехзначные числа кратные 4 (for)

nastya2719 nastya2719    3   04.09.2019 11:40    1

Ответы
Cuba125 Cuba125  06.10.2020 16:48
Vari:longint;begini:=1000;for i:=1000 to 9999 do beginif i mod 4=0 then write(i,' ');end;end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика