После единых выпускных экзаменов по информатике в район пришла информация о том, какой ученик какой школы сколько баллов набрал.
Районный методист решила выяснить номер школы, ученики которой набрали наибольший средний балл, с точностью до целых.
Программа должна вывести на экран номер такой школы и её средний балл.
Если наибольший средний балл набрало больше одной школы — вывести количество таких школ.
Напишите эффективную, в том числе и по используемой памяти, программу (укажите используемую версию языка программирования, например Borland Pascal 7.0), которая должна вывести на экран требуемую информацию. Известно, что информатику сдавало больше 5-ти учеников района. Также известно, что в районе школы с некоторыми номерами не существуют.
На вход программе сначала подаётся число учеников, сдававших экзамен. В каждой из следующих N строк находится информация об учениках в формате:
где — строка, состоящая не более чем из 30 символов без пробелов,
— строка, состоящая не более чем из 20 символов без пробелов,
— целое число в диапазоне от 1 до 99,
— целое число в диапазоне от 1 до 100.
Эти данные записаны через пробел, причём ровно один между каждой парой (то есть всего по три пробела в каждой строке).
Пример входной строки:
Иванов Иван 50 87
Пример выходных данных:
5
Другой вариант выходных данных:
7
Средний балл = 74
Районный методист решила выяснить номер школы, ученики которой набрали наибольший средний балл, с точностью до целых.
Программа должна вывести на экран номер такой школы и её средний балл.
Если наибольший средний балл набрало больше одной школы — вывести количество таких школ.
Напишите эффективную, в том числе и по используемой памяти, программу (укажите используемую версию языка программирования, например Borland Pascal 7.0), которая должна вывести на экран требуемую информацию. Известно, что информатику сдавало больше 5-ти учеников района. Также известно, что в районе школы с некоторыми номерами не существуют.
На вход программе сначала подаётся число учеников, сдававших экзамен. В каждой из следующих N строк находится информация об учениках в формате:
где — строка, состоящая не более чем из 30 символов без пробелов,
— строка, состоящая не более чем из 20 символов без пробелов,
— целое число в диапазоне от 1 до 99,
— целое число в диапазоне от 1 до 100.
Эти данные записаны через пробел, причём ровно один между каждой парой (то есть всего по три пробела в каждой строке).
Пример входной строки:
Иванов Иван 50 87
Пример выходных данных:
5
Другой вариант выходных данных:
7
Средний балл = 74
💡 Пошаговый разбор и решение:
ПАСКАЛЬ
var s,k:array[1..99] of integer;
ch:char;
i,N,sh,ball ,m, count, max, imax:integer;
begin
for i:=1 to 99 do {обнуляем массивы}
begin
s [i] := 0 ;
k[i]:=0
end;
readln(N); {считали количество строк}
for i:=1 to N do {перебираем все входные строки}
begin
repeat
read(ch)
until ch=' ';{считана фамилия}
repeat
read(ch) until ch=' ' ;{считано имя}
readln(sh,ball); {считали номер школы и балл ученика}
s[sh]:=s[sh]+ball; {считаем сумму баллов по школе}
k[sh]:=k[sh]+1 {считаем количество учеников из школы}
end;
max:=-1;
count:=1;
imax:=-1;
for i:=1 to 99 do if k[i]>0 then
begin
s[i] := s[i] div k[i]; {считаем средний балл по каждой школе}
if s[i] > max then begin
max := s[i];
imax:=i;
count := 1;
end;
if s[i] = max then count := count + 1;
end;
writeln;
if count=1 then begin
writeln(imax);
writeln('Средний балл = ',ball);
end;
if count > 1 then
writeln(count);
end.
var s,k:array[1..99] of integer;
ch:char;
i,N,sh,ball ,m, count, max, imax:integer;
begin
for i:=1 to 99 do {обнуляем массивы}
begin
s [i] := 0 ;
k[i]:=0
end;
readln(N); {считали количество строк}
for i:=1 to N do {перебираем все входные строки}
begin
repeat
read(ch)
until ch=' ';{считана фамилия}
repeat
read(ch) until ch=' ' ;{считано имя}
readln(sh,ball); {считали номер школы и балл ученика}
s[sh]:=s[sh]+ball; {считаем сумму баллов по школе}
k[sh]:=k[sh]+1 {считаем количество учеников из школы}
end;
max:=-1;
count:=1;
imax:=-1;
for i:=1 to 99 do if k[i]>0 then
begin
s[i] := s[i] div k[i]; {считаем средний балл по каждой школе}
if s[i] > max then begin
max := s[i];
imax:=i;
count := 1;
end;
if s[i] = max then count := count + 1;
end;
writeln;
if count=1 then begin
writeln(imax);
writeln('Средний балл = ',ball);
end;
if count > 1 then
writeln(count);
end.
📚 Похожие разобранные задания по предмету:
ID 33045 • Задание №18
Квадрат разлинован на N × N клеток (1 N вправо или вниз. По команде вправо Робот перемещается в соседнюю праву...
ID 32038 • Задание №13
На рисунке — схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, И, К, Л. По каждой дороге можно двигаться т...
Официальные критерии проверки ФИПИ:
Критерии проверки:
Критерии оценивания выполнения задания | Баллы
Программа работает для любых входных данных произвольного размера и находит ответ, не сохраняя входные данные в массиве, размер которого соответствует числу N (количеству запросов). Программа просматривает входные данные один раз. Допускается наличие в тексте программы одной синтаксической ошибки: пропущен или неверно указан знак пунктуации, неверно написано или пропущено зарезервированное слово языка программирования, не описана или неверно описана переменная, применяется операция, недопустимая для соответствующего типа данных (если одна и та же ошибка встречается несколько раз, то это считается за одну ошибку). | 4
Программа работает верно, но входные данные запоминаются в массиве, размер которого соответствует числу N. Этот массив, возможно, потом сортируется. Допускается наличие от одной до трех синтаксических ошибок. Возможно, в принципиально верно организованном вводе данных есть одна ошибка (например, использование read вместо readln в Паскале или неверное считывание строки в C++). Три балла также выставляется, если в эффективной программе, удовлетворяющей критериям выставления 4 баллов, есть одна ошибка, в результате которой программа работает неверно на некоторых наборах нетипичных входных данных. | 3
Программа работает в целом верно, эффективно или нет, но в реализации алгоритма содержится до двух ошибок (неверная инициализация счётчиков, допущена ошибка в принципиально верно организованной сортировке или алгоритме поиска минимальных элементов, используется знак “
Программа, возможно, неверно работает при некоторых входных данных, но по приведённому тексту решения ясно, что экзаменуемый понимает, из каких этапов должно состоять решение задачи. При использовании сортировки она может быть реализована принципиально неверно (например, вместо двух циклов используется один), или допущена принципиальная ошибка в поиске нужных элементов. Всего допускается до 4 различных ошибок в реализации алгоритма, в том числе описанных в критериях присвоения двух баллов. Допускается наличие от одной до семи синтаксических ошибок, описанных выше. | 1
Задание не выполнено или выполнено неверно. | 0
Максимальный балл | 4
Критерии оценивания выполнения задания | Баллы
Программа работает для любых входных данных произвольного размера и находит ответ, не сохраняя входные данные в массиве, размер которого соответствует числу N (количеству запросов). Программа просматривает входные данные один раз. Допускается наличие в тексте программы одной синтаксической ошибки: пропущен или неверно указан знак пунктуации, неверно написано или пропущено зарезервированное слово языка программирования, не описана или неверно описана переменная, применяется операция, недопустимая для соответствующего типа данных (если одна и та же ошибка встречается несколько раз, то это считается за одну ошибку). | 4
Программа работает верно, но входные данные запоминаются в массиве, размер которого соответствует числу N. Этот массив, возможно, потом сортируется. Допускается наличие от одной до трех синтаксических ошибок. Возможно, в принципиально верно организованном вводе данных есть одна ошибка (например, использование read вместо readln в Паскале или неверное считывание строки в C++). Три балла также выставляется, если в эффективной программе, удовлетворяющей критериям выставления 4 баллов, есть одна ошибка, в результате которой программа работает неверно на некоторых наборах нетипичных входных данных. | 3
Программа работает в целом верно, эффективно или нет, но в реализации алгоритма содержится до двух ошибок (неверная инициализация счётчиков, допущена ошибка в принципиально верно организованной сортировке или алгоритме поиска минимальных элементов, используется знак “
Программа, возможно, неверно работает при некоторых входных данных, но по приведённому тексту решения ясно, что экзаменуемый понимает, из каких этапов должно состоять решение задачи. При использовании сортировки она может быть реализована принципиально неверно (например, вместо двух циклов используется один), или допущена принципиальная ошибка в поиске нужных элементов. Всего допускается до 4 различных ошибок в реализации алгоритма, в том числе описанных в критериях присвоения двух баллов. Допускается наличие от одной до семи синтаксических ошибок, описанных выше. | 1
Задание не выполнено или выполнено неверно. | 0
Максимальный балл | 4
🔗 Другие задания линии №19 по предмету Информатика:
ID 33084
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходя...
ID 33085
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходя...
ID 33086
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходя...
ID 33087
Два игрока, Паша и Вася, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходя...
ID 33088
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходя...