Вывести в столбик целые числа от -17 до 3 кратные 4
Вывести в столбик целые числа от -17 до 3 кратные 4
Гость
Ответ(ы) на вопрос:
Гостьvar i: integer;
begin
i:=-16;
repeat
writeln(i);
i:=i+4;
until i>=0;
end.
Не нашли ответ?
Похожие вопросы