информатика

Составить программу:Дан одномерный массив. Подсчитайте, сколько раз встречается в этой таблице максимальное по величине число

Оставить ответ
1

Ответ №1

Begin
 var n:=readinteger();
 var ar:=readarrinteger(n);
 write(ar.Where(x->x=ar.max).Count);
end.

Знаете ответ?