С квлавиатуры вводится целое число n. Найти наименьшое целое число большее n;…

Question

75

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

в избранное ссылка

Знаете ответ?

omega · Accepted Answer

36

omega

07 марта 2023

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.

комментировать

в избранное ссылка отблагодарить