Даны значения двух моментов времени, принадлежащих одним и тем же суткам: часы, потом минуты и секунды для каждого из моментов времени. известно, что второй момент времени наступил не раньше первого. определите, сколько секунд двумя моментами времени. формат входных данных в первой строке входных данных находятся три целых числа — часы, минуты и секунды первого момента времени. во второй строке — три числа, характеризующие второй момент времени. число часов лежит в диапазоне от 0 до 23, число минут и секунд — от 0 до 59. формат выходных данных выведите сколько грамм песка просыпалось за время между двумя указанными моментами времени. примеры входные данные выходные данные 1 1 1 2 2 2 1 2 30 1 3 20
PascalABC
Program Time;
var h1,h2,m1,m2,s1,s2:integer;
begin
writeln('Введите первый момент времени:');
write('Часы = '); readln(h1);
write('Минуты = '); readln(m1);
write('Секунды = '); readln(s1);
writeln('Введите второй момент времени:');
write('Часы = '); readln(h2);
write('Минуты = '); readln(m2);
write('Секунды = '); readln(s2);
s1:=h1*3600+m1*60+s1;
s2:=h2*3600+m2*60+s2;
writeln('Между первым и вторым моментом секунд.');
end.