begin
if ReadSeqReal(ReadInteger).Aggregate(1.0, (a, b)-> a * b) < 1000
then Print('Верно')
else Print('Неверно')
end.
Нет! Так как это могут быть числа 20 23 43 5 и т.д., они могут в произведении давать число, которое человеку неизвестно
begin
if ReadSeqReal(ReadInteger).Aggregate(1.0, (a, b)-> a * b) < 1000
then Print('Верно')
else Print('Неверно')
end.
Пример414.5 0.018 56 3.7ВерноНет! Так как это могут быть числа 20 23 43 5 и т.д., они могут в произведении давать число, которое человеку неизвестно