var
h1,m1,s1,h2,m2,s2,tsuti,tsami,saati,t1,t2,sxvaoba,e:longint;
s:string;
begin
assign(input, 'timediff.in'); reset(input);
assign(output, 'timediff.out'); rewrite(output);
readln(s);
val(copy(s,1,2),h1,e); val(copy(s,4,2),m1,e); val(copy(s,7,2),s1,e);
readln(s);
val(copy(s,1,2),h2,e); val(copy(s,4,2),m2,e); val(copy(s,7,2),s2,e);
t1 := h1 * 60 * 60 + m1 * 60 + s1;
t2 := h2 * 60 * 60 + m2 * 60 + s2;
sxvaoba := t2 - t1;
if sxvaoba < 0 then sxvaoba := sxvaoba + 24 * 60 * 60;
saati := sxvaoba div 60 div 60;
tsuti := (sxvaoba div 60) mod 60;
tsami := sxvaoba mod 60;
if saati > 0 then write(saati,' saati ');
if tsuti > 0 then write(tsuti,' tsuti ');
if tsami > 0 then write(tsami,' tsami');
writeln;
close(output); close(input);
end.
Dixtosa ![]() Eშისაიდან მოვიდა 3**13?ისე 4 * 52 * 3**13 = 331M+ ...
|
Quick ![]() Upsolving ჩაირთო...
|
saba_tavdgiridze ![]() აღარ მინდა.:)...
|
saba_tavdgiridze ![]() B ამოცანის 17 ტესტს ვერ მიმანიშნებთ?...
|
tornike5 ![]() ვაპირებდი იგივე მეკითხა მარა მეგონა უეჭველი იქნება...
|
giorgi123 ![]() მადლობა.შარშან ფინალში ამოცანების ყურებით ვიფარგლე...
|
Elle ![]() შარშან ფინალს codeblocks-ით წერდით?დავაყენეთ codeb...
|