Вывести на экран числа кратные 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
Не нашли ответ?
Ответить на вопрос
Похожие вопросы