Пишет Неожиданный символ ' ' строка 2 в PascalABC Вот текст программы:
var
n, h, m, s : integer;
begin
read(n);
n := n mod (3600*24);
h := n div 3600;
m := n mod 3600 div 60;
s := n mod 60;
writeln(h div 10, h mod 10, ':', m div 10, m mod 10, ':', s div 10, s mod 10);
end.
var
n, h, m, s : integer;
begin
read(n);
n := n mod (3600*24);
h := n div 3600;
m := n mod 3600 div 60;
s := n mod 60;
writeln(h div 10, h mod 10, ':', m div 10, m mod 10, ':', s div 10, s mod 10);
end.
More Questions From This User See All