Ребят! срочно надобно! составить программку на Паскале.С начала суток прошло k

 Program Vrema; Заглавие программки
var k,n1,n2:integer; Записываю переменные, которые буду использовать
Begin начало программы
Writeln('Введите k'); Прошу, чтоб пользователь ввел количство минут
readln(k); Ввод
n1:= k div 60; Выделяю количество часов
n2:=k mod 60; Выделяю количество минут
writeln(n1,' часа(ов) ', n2,' минут(ты)'); Вывожу ответ на экран
end. Конец

(Проверил на Pescal. NET, работает. По вопросам, обращайтесь)