Question

С квлавиатуры вводится целое число n. Найти наименьшое  целое число большее n; такое, что оно делится нацело на 27 и не делится на 2 и на 5
PASCAL help

Answer 1

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.

Answer 2

10

Answer 3

Ошибаешься, 15 делится на 5, но НЕ делится на 2.. Так контр пример не прошел :)