FPCБилет на одну поездку в метро стоит 15 рублей, билет на 10 поездок стоит 125 рублей,…

FPCБилет на одну поездку в метро стоит 15 рублей, билет на 10 поездок стоит 125 рублей, билет на 60 поездок стоит 440 рублей. Пассажир планирует совершить n поездок. Определите, сколько билетов каждого вида он должен приобрести, чтобы суммарное количество оплаченных поездок было не меньше n, а общая стоимость приобретенных билетов – минимальна. Формат входных данных Дано одно число n — количество поездок. Формат выходных данныхВыведите три целых числа, равные необходимому количеству билетов на 1, на 10, на 60 поездок. ПримерыВходные данные 129Выходные данные 0 1 2 расбор… Целая часть от деления n на 60 будет являтся количеством билетов на 60 поездок. Однако если остаток, полученый в результате этого деления, будет больше или равен 35, то «выгоднее» купить еше 1 билет на 60 поездок, чем 3 на 10 и 5 на 1. Если остаток меньше 35 — берем целую часть от его деления на 10 — получим кол-во белетов на 10 поездок. Если остаток от этого деления равен 9, то «выгоднее» купить еще 1 билет на 10 поездок, чем 9 на 1. Если остаток меньше 9 — то этот остаток и будет являться кол-вом билетов на 1 поездку. Вопрос… что не так с моим кодом? var l,k,j,t,m,p,s,n: longint; begin read (n); l: =n div 60; k: =n mod 60; j: =k div 10; t: =k mod 10; if l>=1 then s: =l; if k>=35 then s: =l+1 else if k<35 then p: =j; if t=9 then p: =j+1 else if t<9 then m: =t; writeln (m,',p,',s) end.