Программа получает на вход целые числа, не равные 0. количество введенных чисел неизвестно, последовательность чисел заканчивается 0. введенные числа по модулю не превышают 30000. программа должна ответить на вопрос: верно ли, что максимальное из чисел превышает минимальное больше чем в 2 раза?
Kuro111
2
27.08.2019 04:50
2
Другие вопросы по теме Информатика
87074552993
05.04.2020 06:21
VadAltman13
05.04.2020 06:21
polinakarpenko3
05.04.2020 06:20
kostja07
05.04.2020 06:20
nikitasonar
21.05.2019 01:20
nadezhdalipchan
17.02.2021 22:39
Denis7788
17.02.2021 22:34
capppcappi
17.02.2021 22:31
20kokosik26
06.02.2021 17:03
Популярные вопросы
- У 1722р. замість Малоросійського приказу було утворено Продовжіть...
1 - Для какого из перечисленных слов при определении части речи...
3 - Сколько слов склоняемой части речи в предложении?...
2 - Основні риси що визначають риси відмінності та подібності міщаних...
3 - 5. Диктант с заданием. ВеснойАпрель – это второй весенний мёсяц.покрывает...
3 - Один чоловік на запитання, скільки він має грошей, відповів:...
2 - Назовите важные достижения индустриализации в Казахстане в 1920-1930...
2 - Привести примеры личного и основного социальных статусов...
2 - Навести декілька позитивних та негативних факторів економічних...
1 - русский язык баранов ,ладыженская номер 278 но училка ещё сказала...
3
Begin
ReadLn(A);
Max:=A;
Min:=A;
While A<>0 do
Begin
ReadLn(A);
if A>Max then Max:=A;
if A<Min then Min:=A;
End;
WriteLn(Max/Min > 2)
End.