В некотором городе Че билеты на проезд в общественном транспорте (назовем такие билеты одним словом - проездной) можно купить по разным тарифам: - проездной на одну поездку стоит 15 рублей,
- проездной на 10 поездок стоит 125 рублей,
- проездной на 60 поездок стоит 440 рублей.
Вы планируете совершить n поездок.
Определите, сколько проездных каждого вида Вы должны купить, чтобы потратить как можно меньше денег, а общее число оплаченных поездок было не меньше n

Входные данные: Программа получает на вход одно число n.
Выходные данные: Программа должна вывести три целых числа, равных необходимому количеству билетов на 1, на 10, на 60 поездок.

Примеры
№ Входные данные Выходные данные
1 36 0 0 1
2 64 4 0 1

Желательно на с++

60 поездок

Объяснение:

при покупке 60 поездок мы тратим намного меньше денег, чем потратили бы, если бы покупали одну поездку за 15 руб каждый раз

program nm12;

var a, d : integer;

begin

    writeln (' vvedite diametr kruga i storony kvadrata ');

    readln (d);

    readln (a);

    if d< =a then writeln (' krug pomestits9 v kvadrate ')

              else writeln (' krug ne pomestits9 v kvadrate ');

    readln;

end.

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.