Сколько будет. xне(x)yykне(k)+xyне(y)ykне(k)=

Какие папки доступны при создании ящика? в почтовом ящике по умолчанию доступны стандартные папки для работы с письмами: «входящие»; «отправленные»; «черновики»; «корзина»; «спам». стандартные папки являются обязательными и их нельзя удалить или переименовать. названия папок и количество непрочитанных писем в них отображены в левом верхнем углу страницы. для перехода в папку нужно кликнуть по ее названию. для удобства группировки и распределения писем можно создавать, редактировать и удалять собственные папки.

pascal:

var a,n,count,max,i: integer;

begin

count : =0;

max: = -1;

readln(n);

for i: =1 to n do

      begin

      readln(a);

  if (a> max) then

        begin

        max: =a;

  count: =1;

  end

  else

          begin

          if (a = max) then

        count: =count+1;

  end

      end;

writeln(count);

end.