ИНФА. СРОЧНО. 1.Дано время в часах и минутах. Написать программу, которая переводит время в секунды. Вывод на экран оформите следующим образом:
Введите часы: 5
Введите минуты: 38
Время в секундах: 20280

2. Дано натуральное число n – расстояние выраженное в миллиметрах. Записать это расстояние, выделив метры, сантиметры и миллиметры. Вывод на экран оформите следующим образом:
Введите расстояние (в мм): 12345
12345 мм = 12 м 34 см 5 мм

Помогите, пожалуйста, хоть с одним, если не с двумя!

var

  h, m: integer;

begin

  write('Введите часы:');

  readln(h);

  write('Введите минуты:');

  readln(m);

  writeln('Время в секундах:', h * 3600 + m * 60);

end.