amura20
31.07.2021 22:15

Pascal для новичков a. найди число- 0 имя входного файла стандартный ввод имя выходного файла стандартный вывод ограничение по времени 2 секунды ограничение по памяти 64 мегабайта дано число n. необходимо найти минимальное число, большее n, которое нацело делится на 19. формат входных данных вводится целое число n (1≤n≤230). формат выходных данных требуется вывести искомое число.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
alekseyovsyann
09.06.2020 00:07
Var n, m:integer;
begin
read(n);
m:=n+1;
while m mod 19<>0 do begin
if (m>n) and (m mod 19=0) then break;
m:=m+1;
end;
write(m);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота