Ответы
Ответ дал:
0
PascalABC.NET 3.2, сборка 1387 от 20.02.2017
Внимание! Если программа не работает, обновите версию!
begin
ReadArrReal('Введите 5 чисел',5).Where(x->x<0).Println
end.
Пример
Введите 5 чисел 4 -3.1 5.7 -2 6
-3.1 -2
Внимание! Если программа не работает, обновите версию!
begin
ReadArrReal('Введите 5 чисел',5).Where(x->x<0).Println
end.
Пример
Введите 5 чисел 4 -3.1 5.7 -2 6
-3.1 -2
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад