Для заданного количества суток (tfh) требуется определить количество часов (h), минут (m) и секунд (с)
Var days: integer; begin read(days); writeln(' = ', 24 * days, ' часов'); writeln(' = ', 60 * 24 * days, ' минут'); writeln(' = ', 60 * 60 * 24 * days, ' секунд'); end.