Вывести в столбик целые числа от -17 до 3 кратные 4
Помогите очень надо !
Var i:integer;
begin
for i:=-17 to 3 do
if (i mod 4=0) then writeln(i:4);
end.
ПРоВерКА
-16
-12
-8
-4
0
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
