Напишите программу на паскале, которая выбирает из списка футболистов лучшего бомбардира – того, кто - id979740720210225 от Tryys 25.02.2021 15:16

Question

Информатика: Напишите программу на паскале, которая выбирает из списка футболистов лучшего бомбардира – того, кто забил наибольшее количество мячей. если несколько человек забили одинаковое наибольшее количество мячей, нужно вывести их имена и фамилии в том порядке, в котором они встречаются в исходном списке. входные данные в первой строке записано количество футболистов в списке n . следующие n строк имеют формат: фамилия имя год рождения число забитых мячей выходные данные программа должна вывести фамилии

Tryys · Accepted Answer

Проверено на fpc 3.0.0 const   m=6; // строк   n=9; // столбцов var   a:array[1..m,1..n] of integer;   i,j,k1,k2,s,k:integer; begin   Writeln( Введите границы диапазона: ); Read(k1,k2);   Randomize;   s:=0; k:=0;   for i:=1 to m do begin     for j:=1 to n do begin       a[i,j]:=Random(199)-99; // [-99;99]       Write(a[i,j]:4);       if (a[i,j] =k1) and (a[i,j] =k2) then begin         Inc(k); s:=s+a[i,j]         end       end;     Writeln     end;   Writeln( Отобрано элементов: ,k, , их сумма равна...

MOGZ ответил