Question

Задача «Разность времен» Условие Даны значения двух моментов времени, принадлежащих одним и тем же суткам: часы, минуты и секунды для каждого из моментов времени. Известно, что второй момент времени наступил не раньше первого. Определите, сколько секунд прошло между двумя моментами времени. Программа на вход получает три целых числа: часы, минуты, секунды, задающие первый момент времени и три целых числа, задающих второй момент времени. Выведите число секунд между этими моментами времени. НА ПИТОНЕ ВЕРССИ 3

Answer 1

Я решил, работает:
program vrem;
var
s1,s2,m1,m2,h1,h2,sec:integer;
begin
write('Perviy moment: ');
readln(h1,m1,s1);
write('Vtoroy moment: ');
readln(h2,m2,s2);
sec:=(s2-s1)+(((m2-m1)+((h2 - h1)*60))*60);
writeln('Sek: ',sec);
readln;
end.