• Имеется таблица самых высоких гор мира. Найти и вывести первых 3 высоких гор. Паскаль, помогитеееееее срочноооо

Ответы 1

  • // PascalABC.NET 3.3, сборка 1579 от 18.11.2017// Внимание! Если программа не работает, обновите версию!type  Mountain=(string,integer);    procedure Print3Highs(t:array of Mountain);begin  t.OrderByDescending(x->x[1]).Take(3).Println(NewLine)end;begin  var a:array of Mountain:=Arr(      Rec('Эльбрус',5642),      Rec('Винсон',4892),      Rec('Килиманджаро',5895),      Rec('Эверест',8848),      Rec('Аконкагуа',6959),      Rec('Мак-Кинли',6194));   Print3Highs(a)end.Результат(Эверест,8848)(Аконкагуа,6959)(Мак-Кинли,6194)
  • Добавить свой ответ

Войти через Google

или

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

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

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