Вывести на экран числа кратные 6 из интервала 50-100. В Паскале АВС
Вывести на экран числа кратные 6 из интервала 50-100.
В Паскале АВС
Ответ(ы) на вопрос:
Var
i:integer;
begin
i:=54;
repeat
Write(i:3);
i:=i+6
until i>100;
Writeln
end.
Результат
54 60 66 72 78 84 90 96
Не нашли ответ?
Похожие вопросы