СашаВай1
12.02.2020 06:42

Составьте программу которая находит наименьшее 13 и превосходящее 3000

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Dogerman11
06.08.2020 23:53
ответ: 3003

Var
  i : Integer;
Begin
  i:=3000;
  While i mod 13<>0 do Inc(i);
  Writeln(i);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота