Question

РЕБЯТ ПОЖАЛУЙСТА СРОЧНО НУЖНО В pascal И ИСПОЛЬЗОВАТЬ div 60 mod 60

Answer 1

Ответ:

program TimeConv;

var

 mm, m, h: Integer;

begin

 Write ('Введите величину временного интервала (в минутах)-> ');

 ReadLn (mm);

 h := mm div 60;

 m := mm mod 60;

 WriteLn (mm, ' минут - это ', h, ' ч. ', FormatFloat ('00', m), ' мин.');

 ReadLn;

end.

Объяснение:

FormatFloat для лидирующих нулей в минутах: 05