• Предмет: Информатика
  • Автор: Глуповец
  • Вопрос задан 7 лет назад

Программа Паскаль: которая ищет минимальное число, больше 21, которое делится на 7 и оканчивается на 1.

Ответы

Ответ дал: Аноним
0
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=21;
  repeat
    n+=1
  until (n mod 7=0) and (n mod 10=1);
  n.Println
end.

Результат
91
Вас заинтересует