С квлавиатуры вводится целое число n. Найти наименьшое целое число большее n; такое, что оно делится нацело на 27 и не делится на 2 и на 5
PASCAL help
Ответы на вопрос
Ответил archery
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.
Ответил archery
0
10
Ответил Аноним
0
Ошибаешься, 15 делится на 5, но НЕ делится на 2.. Так контр пример не прошел :)
Новые вопросы