Ответ:

Код написал ниже

Объяснение:

program a;

var hour, min, sec,time: integer;

begin

 write ('Введите часы полёты ракеты: ');

 readln(hour);

 write ('Введите минуты полёта ракеты: ');

 readln(min);

 write ('Введите секунды полёта ракеты: ');

 readln (sec);

 time:= hour*3600 + min*60 + sec;

 writeln ('Ракета летела ', time, ' секунд');

end.

Просим ввести все данные, потом переводим часы и минуты в секунды, складуем полученные результаты с секундами. и полученное число выводим на экран