erm sa vedem ce mai tin minte din pascal
Ideea de baza e urmatoarea 1ora=3600 sec. 1min=60s. Imparti nr initial la 3600, rezultatul sunt orele, apoi retii restul. Imparti restul la 60, catul sunt minutele, restul sunt secunde
var x,h,m,s: integer;
begin
h:=x div 3600;
x:=x mod 3600;
m:=x div 60;
s:=x mod 60;
writeln(h," ",m,' ',s);
endl;
