Дано количество секунд сначала суток. вычислить текущее время в виде количества часов, минут и секунд.

Маруся203 Маруся203    1   26.05.2019 05:50    1

Ответы
AngelinaMois AngelinaMois  22.06.2020 15:11
Var h,m,s,a: integer;
begin
readln(a);
h:= a div  3600;
m:= (a - h*3600) div 60;
s:= a - m*60 - h*3600;
writeln(h); writeln(m);write(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
belbeksev belbeksev  22.06.2020 15:11
Uses crt;
var a,h,m,s:integer;
begin
readln(a);
h:=a div 3600;
a:=a mod 3600;
m:=a div 60;
a:=a mod 60;
s:=a;
write(h,':',m,':',s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика