Question

Сначала суток прошло л N секунд ( N-цело юте) Найти количество полных часов прошедши с начала суток

Answer 1

Program n1;
var a: integer;
begin
readln(a);
write(trunc(a/60) div 60);
end.