Склавиатуры вводятся число секунд, необходимо найти и вывести на экран количество минут и секунд, которые подучатся в ходе вычислений

Zigmynda11 Zigmynda11    1   08.06.2019 07:20    0

Ответы
Sasha1998rus Sasha1998rus  07.07.2020 15:15
Var s,m,h:integer;
begin
write('Число секунд: ');
readln(s);
h:=s div 3600;
s:=s-h*3600;
m:=s div 60;
s:=s-m*60;
writeln(h,':',m,':',s)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика