Ре­ше­ние. ПАС­КАЛЬ

var points, npupils, mean:array[1..100] of integer;

ch:char;

i,N, school,p,k, max:integer;

begin

for i:=1 to 100 do {об­ну­ля­ем мас­си­вы}

begin

points[i]:= 0;

mean[i]:=0;

npupils[i]:=0;

end;

readln(N); {счи­та­ли ко­ли­че­ство строк}

for i:=1 to N do {пе­ре­би­ра­ем все вход­ные стро­ки}

begin

repeat

read(ch)

until ch=' ';{счи­та­на фа­ми­лия}

repeat

read(ch) until ch=' ';{счи­та­но имя}

readln(school,p); {счи­та­ли номер школы и балл уче­ни­ка}

points[school]:=points[school] + p; {на­ка­пи­ли­ва­ем балл уче­ни­ков для расчёта сред­не­го в даль­ней­шем}

npupils[school]:=npupils[school] + 1; {на­кап­ли­ва­ем ко­ли­че­ство уче­ни­ков в школе}

end;

for i:=1 to 100 do {Вы­чис­ля­ем сред­ний балл в каж­дой школе с точ­но­стью до це­ло­го}

begin

mean[i]:= points[i] div npupils[i];

end;

max:=-1;

for i:=1 to 100 do {На­хо­дим школы с наи­боль­шим сред­ним бал­лом и за­по­ми­на­ем их ко­ли­че­ство}

begin

if mean[i]>max then

begin

max:=mean[i];

k:=1;

end

else if mean[i]=max then

begin

k:=k+1;

end;

end;

if k > 1 then

begin

writeln('Всего школ:', k);

writeln('Наи­боль­ший сред­ний балл =', max);

end

else

begin

writeln('Школа с луч­шим сред­ним бал­лом');

writeln('Наи­боль­ший сред­ний балл =', max);

end;

end.

При­во­дим ре­ше­ние Ва­лен­ти­на До­бринг­ско­го на C++.

#include

using namespace std;

void main()

{

const int size = 99;

struct base

{

int amount;

int sum;

};

base s[size];

int N = 0;

int tmp=0;

int count=0;

int max=0;

int j = 0;

char surname[30]; name[20];

cin >> N;

for (int i = 0; i < size; i++)

{

s[i].amount = 0;

s[i].sum = 0;

}

for (int i = 0; i < N; i++)

{

cin >> surname >> name >> j >> tmp;

s[j-1].amount++;

s[j-1].sum = s[j-1].sum + tmp;

}

for (int i = 0; i < size; i++)

{

if (max < s[i].sum)

{

max = s[i].sum;

count = 1;

tmp = i;

}

if (max == s[i].sum)

count++;

}

if (count == 1)

cout<<"Nomer school: "<<<"Sredniy ball: "<else

cout << "Kol-vo school: " << count << endl

<< "Sredniy ball: " << max / s[tmp].amount << endl;

system("pause");

}