Определите f – угол (в градусах) между положением часовой стрелки в начале суток и её положением в h часов, m минут и s секунд (0

uses crt;
var h,m,s:integer;
angle : real;
 
begin
 clrscr;
 write('H M S -> ');
 readln(h, m, s);
 if h<=12 then h:=h-12;
 angle := 360 * (h*3600 + m*60 + s) / (12*3600);
 writeln(angle:0:3);
 readln;
end.