Елизавета123455 Если нужно изменить\дополнить\пояснить пиши. 
var a:integer;
begin
readln(a);
writeln(a div 60,'мин ',a mod 60,'сек')
end.