• Трудный выбор
    Ограничение времени 1 секунда
    Ограничение памяти 64Mb
    Ввод стандартный ввод или input.txt
    Вывод стандартный вывод или output.txt
    В этом году третий раз одна известная компания проводит соревнование по программированию искусственного интеллекта для игровых стратегий. В этот раз участникам предложили написать искусственный интеллект для управления командой хоккеистов. После проведения очередного тура, Вася решил, что для дальнейшего улучшения своей стратегии необходимо просмотреть все бои с теми соперниками, которые сопоставимы с ним по проценту побед. Задана таблица результатов боев в прошедшем раунде. В каждой строке записаны ник соперника Васи и итоговый счет. Первое число показывает, сколько шайб забила стратегия Васи, вторая — сколько шайб забила стратегия соперника. Необходимо подсчитать процент побед каждого участника и вывести результат, отсортировав его в порядке неубывания процентов. Если процент побед оказался одинаковым, то нужно упорядочить записи по никам лексикографически.

    Формат ввода
    В первой строке входного файла записано целое число N (1 ≤ N ≤ 105) — количество записей в таблице. В каждой из последующих N строк через пробел записаны ник соперника, сколько забила Васина команда и сколько забил соперник. Гарантируется, что каждый ник — непустая строка, длина которой не превосходит 10 символов и состоящая из строчных букв латинского алфавита. Так же известно, что никто из участников не забивал больше 1000 голов.

    Формат вывода
    В первой строке выходного файла выведите количество соперников. В последующих строках выведите ник соперника и процент побед Васиной команды с точностью не хуже шести знаков после запятой.

    Пример 1
    Ввод Вывод
    1
    tpusct 1 60
    1
    tpusct 0.0000000000 паскаль

Ответы 1

  • var f1,f2:text;

    d,s,z,n:longword;

    a,b,t,m,x:smallint;

    begin

    assign(f1,'input.txt');

    reset(f1);

    assign (f2,'output.txt');

    rewrite(f2);

    readln(f1,d,a,b,s,t);

    if a>b then x:=a-b else x:=b-a;

    if d mod s=0 then n:=d div s else n:=d div s+1;

    if x mod t=0 then m:=x div t else m:=x div t+1;

    z:=n+m;

    write(f2,z);

    close (f1);

    close (f2);

    end.

  • Добавить свой ответ

Войти через Google

или

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

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

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