С квлавиатуры вводится целое число n. Найти наименьшое целое число большее n; такое, что оно делится нацело на 27 и не делится на 2 и на 5
PASCAL help
Ответы
Ответ дал:
0
var
n: integer;
begin
readln(n);
repeat
n := n + 1;
until (n mod 27 = 0) and (n mod 2 <> 0) and (n mod 5 <> 0);
writeln(n);
end.
n: integer;
begin
readln(n);
repeat
n := n + 1;
until (n mod 27 = 0) and (n mod 2 <> 0) and (n mod 5 <> 0);
writeln(n);
end.
Ответ дал:
0
10
Ответ дал:
0
Ошибаешься, 15 делится на 5, но НЕ делится на 2.. Так контр пример не прошел :)
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад