• PascalABCNET
    Сначала вводим количество строчек N, где 1<=N <=10^6
    Затем вводим с клавиатуры Фамилии, имена и баллы, где балл от 0 до 100.
    Нужно вывести фамилию и максимальный балл, если таких людей с максимальным баллом несколько, то просто вывести количество таких людей.
    Помогите с прогой пожалуйста, очень прошу)

Ответы 2

  • А можно написать эту прогу в дорогом варианте? Просто мы пишем в другой форме проги со строками. Например последние строчки с Select и Print я вообще не понимаю
  • Программаbegin  var n := ReadlnInteger;  var Data := ArrGen(n, x -> ReadlnString.ToWords);  var MaxScore := Data.Max(x -> x[2].ToInteger);  Data.Where(x -> x[2].ToInteger = MaxScore).Select(x -> x.JoinIntoString).Print(NewLine)end.Ввод:5Георгий Сазонов 65Матвей Панфилов 39Василий Колобов 85Иван Кириллов 72Юрий Гришин 85Вывод:Василий Колобов 85Юрий Гришин 85
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years