program s;
var day, hour, minute, second: integer;
begin
read(day);
hour := day * 24;
minute := hour * 60;
second := minute * 60;
writeln ('Часов: ', hour, ', минут: ', minute, ', секунд: ', second);
end.
program s;
var day, hour, minute, second: integer;
begin
read(day);
hour := day * 24;
minute := hour * 60;
second := minute * 60;
writeln ('Часов: ', hour, ', минут: ', minute, ', секунд: ', second);
end.