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

0 голосов
37 просмотров

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


Информатика (19 баллов) | 37 просмотров
Дан 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
(150k баллов)