Дана последовательность целых чисел a1, a2, ..., an (n <= 40). Получить новую последовательность, выбросив из исходной
элементы со значением max(a1, a2, ..., an)
Надо написать в паскале очень надоо

zakharizh2001 zakharizh2001    1   24.05.2021 16:49    2

Ответы
danielasaske4 danielasaske4  23.06.2021 16:50

##

var n := ReadInteger;

var a := ReadArrInteger(n);

var m := a.Max;

var b := a.Where(t -> t <> m).ToArray;

b.Print


Дана последовательность целых чисел a1, a2, ..., an (n <= 40). Получить новую последовательность,
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика