Question

Даны значения двух моментов времени, принадлежащих одним и тем же суткам: часы, потом минуты и секунды для каждого из моментов времени. известно, что второй момент времени наступил не раньше первого. определите, сколько секунд двумя моментами времени. формат входных данных в первой строке входных данных находятся три целых числа — часы, минуты и секунды первого момента времени. во второй строке — три числа, характеризующие второй момент времени. число часов лежит в диапазоне от 0 до 23, число минут и секунд — от 0 до 59. формат выходных данных выведите сколько грамм песка просыпалось за время между двумя указанными моментами времени. примеры входные данные выходные данные 1 1 1 2 2 2 1 2 30 1 3 20

Answer 1

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.