1. Информатика
  2. Даны n чисел.верно ли,что

Даны n чисел.верно ли,что их проищведение меньше 1000.

krokodilol krokodilol    3   02.10.2019 04:20    0

Ответы
ekaterinkavlas1 ekaterinkavlas1  09.10.2020 10:58
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 if ReadSeqReal(ReadInteger).Aggregate(1.0, (a, b)-> a * b) < 1000

   then Print('Верно')

 else Print('Неверно')

end.

Пример414.5 0.018 56 3.7Верно
ПОКАЗАТЬ ОТВЕТЫ
ипоопан ипоопан  09.10.2020 10:58

Нет! Так как это могут быть числа 20 23 43 5 и т.д., они могут в произведении давать число, которое человеку неизвестно

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
1ЛиКа6 1ЛиКа6  05.06.2021 17:16
Законы компрессии нелинейных кодера...
FanatikOutlast FanatikOutlast  05.06.2021 17:11
Всем привет решить задачу(Желательно на c++/паскале):...
ShahTV ShahTV  05.06.2021 17:06
Сколько раз выполнится тело цикла в следующих фрагментах программ: a) for i:= 2 to do c:=2*i; b) for i:= -7 to 2 do c:=2*i; c) for i:= 11 downto 0 do c:=2*i; d) icri: = 7 to 5 do...
Chelyabin Chelyabin  05.06.2021 16:53
Обьединение цифровых потоков ?...
AnastasiaHCWP AnastasiaHCWP  05.06.2021 16:52
Выполнить в PascalABC! 1. Дана матрица размера 7х8, заполненная случайными числами, кроме элементов а-й строки, которые имеют значение 10*а. Значение а (а =7) вводится с клавиатуры....
Sergeyii Sergeyii  05.06.2021 16:49
Составьте программу для решения следующей задачи. Введите с клавиатуры три числа: А, В. С (где число В равно 19, число А на 1 меньше числа В и число С на 1 больше числа В). Если их...
katyaprodan katyaprodan  05.06.2021 16:20
Здравствуйте решить задачу,а точнее написать прогамму y=sinx на любом языке программирования,желательно с коментариями,что б было понятно...
Natalia1097 Natalia1097  05.06.2021 16:16
Кто кого срубит Конь ходит буквой «Г». Ладья ходит по вертикали и по горизонтали. Вводятся координаты коня (xK, yK) и ладьи (xL, yL). Требуется написать программу, которая выведет...
Ksenon102 Ksenon102  05.06.2021 16:02
Как на Excel построить вот такой график (желательно, чтобы был прикреплён документ Excel)...
Fatima82 Fatima82  05.06.2021 15:59
В аквариуме плавают барбусы, скалярии и карпики. Барбусов и скалярий по 8 штук. Сообщение о том, что выловленная рыбка барбус – несет 2 бита информации. Сколько карпиков в аквариуме?​...

Популярные вопросы