Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  don čičo
Language: PASCAL
Code:
program rozklad sekúnd;
uses crt;
var c, hodiny, minuty,sekundy:integer;
begin;
clr scr;
read c;
SEKUNDY:=c;
HODINY:=o;
while sekundy:=3600 do;
begin;
sekundy:=sekundy 3600;
hodiny:=hodiny+1;
end.
minuty:0;
while sekundy > =60 do;
begin;
sekundy:=sekundy - 60;
minuty:=minuty + 1;
end.
writeln(c:10;hodiny:10);
Comments: