Идёт k-я секунда суток. Разработайте программу, которая по введённой k-й секунде суток определяет, сколько целых часов h и целых минут m прошло с начала суток

Question

Софоний

2 февраля, 20:51

+4

Ответы (1)

Знаете ответ?

Александрыч · Answer 1

Var

k, m, h:integer;

begin

readln (k) ;

writeln (k div 60, ' минут') ;

writeln (k div 3600, ' часов') ;

end.