Решите в паскале срочноя!!!!! Определить Ч-полное количество часов и М-полное количество...

Question

Решите в паскале срочноя!!!!!

Определить Ч-полное количество часов и М-полное количество минут прошедшего от начала суток до того момента (в первой половине дня) когда часовая стрелка повернулась на А градусов(0<А<360, A-вещественное число)</span>

Answer 1

var
  a: real;
  h, m: byte;

begin
  readln(a);
  a := a * 6;
  h := trunc(a / 60);
  m := trunc(a - h * 60);
  writeln(String.Format('{0}:{1}', h, m));
end.