Вывести в столбик целые числа от -17 до 3 кратные 4 Помогите очень надо !
Вывести в столбик целые числа от -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
Не нашли ответ?
Похожие вопросы