Предмет: Информатика,
автор: kristinayudina2105
Дана последовательность целых чисел a1, a2, ..., an (n <= 40).
Получить новую последовательность, выбросив из исходной
элементы со значением max(a1, a2, ..., an)
Надо написать в паскале очень надоо
Ответы
Автор ответа:
0
##
var n := ReadInteger;
var a := ReadArrInteger(n);
var m := a.Max;
var b := a.Where(t -> t <> m).ToArray;
b.Print
Приложения:

Интересные вопросы
Предмет: Русский язык,
автор: SlavaZimin2002
Предмет: Русский язык,
автор: ekaterinabykov4
Предмет: Русский язык,
автор: User119438657
Предмет: Математика,
автор: ХорошаяЧеловечина