Для заданного количества суток (tfh) требуется определить количество часов (h), минут (m) и секунд (c)

Question

Полина Павлова

Информатика

5 августа, 01:43

Для заданного количества суток (tfh) требуется определить количество часов (h), минут (m) и секунд (c)

+2

Ответы (1)

Знаешь ответ на этот вопрос?

Амина Маркелова · Answer 1

Var tfh, h, m, c as integer

Begin

Write ('введите количество суток: ');

Readln (tfh);

H:=tfh*24;

M:=h*60;

C:=m*60;

Writeln ('в ', tfh,' сутках ', h,' часов, ', m,' минут, ', c,' секунд');

End.