Prokudin34 Лови по быстрому сделал ;-) write(min,' мин = '); h:=min div 60; min:=min-(60*h); writeln(h,' ч ',min,' мин.');