Вывести на экран все двухзначные числа, которые кратны 15 в Pascal

Вывести на экран все двухзначные числа, которые кратны 15 в Pascal ABC

Задать свой вопрос
1 ответ

program zz1;
var i:integer; //заводим переменную для цикла
begin
for i:=10 to 99 do //организуем цикл, который переберет все двухзначные числа
if i mod 15 = 0 then write(i, ); //проверяем, если двухзначное число делится на пятнадцать без остатка, то выводим это число на экран в строку через пробел
end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт