abc

abc


  1. var
  2.  b,a,h,m,s:longint;
  3.  begin
  4. read(a);
  5.  b:= a mod 3600;
  6.  h:= a div 3600 mod 24;
  7.  m:= b div 60;
  8.  s:= b mod 60;
  9.  write(h);
  10.  write(':');
  11.  write(m div 10);
  12.  write(m mod 10);
  13.  write(':');
  14.  write(s div 10);
  15.  write(s mod 10);
  16. end.
  17. var
  18.  b,a,h,m,s:longint;
  19.  begin
  20. read(a);
  21.  b:= a mod 3600;
  22.  h:= a div 3600 mod 24;
  23.  m:= b div 60;
  24.  s:= b mod 60;
  25.  write(h);
  26.  write(':');
  27.  write(m div 10);
  28.  write(m mod 10);
  29.  write(':');
  30.  write(s div 10);
  31.  write(s mod 10);
  32. end.