Олимпийские игры - Определить страну-победителя - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Опишите заданный тип, осуществите ввод данных, произведите определенные операции и выведите на печать значение полей (где возможно). Во всех случаях используйте массив из записей. Данные о неофициальном командном зачете на Олимпийских играх: страна, количество участников, количество золотых, серебряных и бронзовых медалей. Определить страну-победительницу, считая, что за первое место дается три очка, за второе - два и за третье - одно.

Решение задачи: «Олимпийские игры - Определить страну-победителя»

textual
Листинг программы
type
  member = record {тип member является записью}
    country : string[50]; {поле записи, где хранится название страны}
    quantity : word; {количество участников}
    gold : byte; {количество золота}
    silver : byte; {количество серебра}
    bronze : byte; {количество бронзы}
  end; {конец описания типа запись}

Оцени полезность:

5   голосов , оценка 4.2 из 5
Похожие ответы