Напишите программу,запрашивающую у пользователя два момента времени(количество часов,минут и секунд) и сообщающую число секунд,прошедшее между этими двумя моментами.

var h1,h2,m1,m2,s1,s2,s:integer;beginwrite('Введите время первого события: ');readln(h1,m1,s1);write('Введите время второго события: ');readln(h2,m2,s2);s:=h2*3600+m2*60+s2-h1*3600-m1*60-s1;writeln('Число секунд между ними: ',s);end.