delphi
procedure CalculateIncludedAngle(ih,im: Integer;var hp,mp: Single) ; begin ih := ih mod 12; hp := 360*(ih+im/60)/12; end;
c++
double CalculateIncludedAngle(int ih,int im)
{
ih = ih % 12;
return 360*(ih+im/60)/12;
}

delphi
procedure CalculateIncludedAngle(ih,im: Integer;var hp,mp: Single) ; begin ih := ih mod 12; hp := 360*(ih+im/60)/12; end;
c++
double CalculateIncludedAngle(int ih,int im)
{
ih = ih % 12;
return 360*(ih+im/60)/12;
}