Программа Паскаль: которая ищет минимальное число, больше 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
Внимание! Если программа не работает, обновите версию!
begin
var n:=21;
repeat
n+=1
until (n mod 7=0) and (n mod 10=1);
n.Println
end.
Результат
91
Вас заинтересует
2 года назад
2 года назад
8 лет назад
8 лет назад