Напишите программку на паскале, которая выбирает из перечня футболистов превосходнейшего бомбардира
Напишите программу на паскале, которая выбирает из перечня футболистов превосходнейшего бомбардира того, кто забил наибольшее количество мячей. Если несколько человек забили однообразное наибольшее количество мячей, необходимо вывести их имена и фамилии в том порядке, в котором они встречаются в исходном перечне.
Входные данные
В первой строке записано количество футболистов в списке N . Последующие N строк имеют формат:
lt;фамилияgt; lt;имяgt; lt;год рожденияgt; lt;число забитых мячейgt;
Выходные данные
Программа обязана вывести фамилии и имена тех футболистов, которые забили наивеличайшее количество мячей. В последней строке программа выводит количество голов, забитых каждым из этих футболистов.
var
n,i,j,max,k: Integer;
lname, name: array [1..100000] of String;
y,g,a:array [1..100000] of longint;
begin
Read(n);
for i:=1 to n do
begin
read(lname[i]);
read (name[i]);
read(y[i],g[i]);
if (maxlt;g[i]) or (i=1) then
max:=g[i];
end;
for i:=1 to n do
if g[i]=max then
begin
writeln(lname[i], ' ', name[i]);
j:=j+1;
a[j]:=i;
end;
for i:=1 to j do
write(g[a[i]], ' ');
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.