Задача в Паскале

[Наталия2012]

Здравствуйте. Помогите пожалуйста решить задачу ...
Коллекция Эрмитажа содержит более 2 800 000 единиц хранения. Если у каждого музейного экспоната задержаться всего на 5 минут и проводить в Эрмитаже по 8 часов каждый день, то может не хватить жизни, чтобы ознакомиться со всей коллекцией. Требуется высчитать суммарное время просмотра всей коллекции в минутах, днях, часах, годах, жизнях, считая что средняя продолжительсть жизни в России составляет 70 лет

Помогите пожалуйста!!!

Я ввожу вот это, а результата у меня почему-то нет?!
Что я не так делаю?

program Kollekciy;
var n, m, ch, d, g, life:
longint;
begin (`Введиде количество 
экземпляров коллекции: 2800000`);
readln(n);
m:=n*5;
ch:=m div 60;
d:=ch div 8;
g:=d div 365;
life:= g div 70;
writeln(`количество:`);
writeln(`минут:`,m);
writeln(`часов:`,ch);
writeln(`дней:`,d);
writeln(`лет:`,g);
writeln(`жизней:`,live);
end.

[Xatr]

Для начала исправим мелкие ошибки:

program Kollekciy;
var n, m, ch, d, g, life:
longint;
begin
write('Введиде количество экземпляров коллекции: ');
readln(n);
m:=n*5;
ch:=m div 60;
d:=ch div 8;
g:=d div 365;
life:= g div 70;
writeln('количество:');
writeln('минут:',m);
writeln('часов:',ch);
writeln('дней:',d);
writeln('лет:',g);
writeln('жизней:',life);
end.

В результате будет такой результат:

Введиде количество экземпляров коллекции: 2800000 
количество:
минут:14000000
часов:233333
дней:29166
лет:79
жизней:1

если такой результат нормальный, то задача решена, иначе будем работать дальше...