Вывести на экран все числа делящиеся на 3 или на 7 в промежутке от 1 до 1000

Ника111111111122222 Ника111111111122222    2   27.02.2019 04:10    4

Ответы
chorna202 chorna202  23.05.2020 15:21

var i:integer;

begin

for i:=1 to 1000 do

if (i mod 3=0) or (i mod 7=0) then write(i);

end.

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