Предмет: Информатика,
автор: BlackCatOne
Написать программу в Паскале:
В массиве из N элементов найти максимальный из отрицательных элементов массива.
Ответы
Автор ответа:
2
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
Println('Максимальный=',ReadArrInteger(ReadInteger('n->')).Where(t->t<0).Max)
end.
Пример:
n-> 5
-7 8 -6 4 -1
Максимальный= -1
//Версия 3.3, сборка 1634 (14.02.2018)
begin
Println('Максимальный=',ReadArrInteger(ReadInteger('n->')).Where(t->t<0).Max)
end.
Пример:
n-> 5
-7 8 -6 4 -1
Максимальный= -1
BlackCatOne:
Спасибо конечно за старания, но программу бы желательно написать в Free Pascal(чтобы были Var, Begin и так далее)
На будущее будете знать, что нужно ТОЧНО указывать яп
Интересные вопросы
Предмет: Алгебра,
автор: bartosh4455
Предмет: Окружающий мир,
автор: Kami1990
Предмет: Қазақ тiлi,
автор: aysauleomirkhan
Предмет: Физика,
автор: Deguzavr
Предмет: Физика,
автор: andronych