Mashaf555
21.11.2020 23:50

(pascal) вывести все нечётные числа кратные пяти в диапазоне от 10 до 100. обязательно использовать repeat и until.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Дрындель
20.08.2020 23:00
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=10;
  repeat
    if n.IsOdd and (n mod 5=0) then Print(n);
    n+=1
  until n>100
end.

Результат
15 25 35 45 55 65 75 85 95
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота