С помощью цикла for вычислить и вывести на экран все остатки от деления на 5 от 20 до 30
С помощью цикла for вычислить и вывести на экран все остатки от деления на 5 от 20 до 30
Гость
Ответ(ы) на вопрос:
Гостьvar x,i: integer;
begin
for i:=20 to 30 do
begin x:=i mod 5;
writeln(x);
end;
end.
Не нашли ответ?
Похожие вопросы