1.1 Degrees in Radians

program Hello;
var
   degrees : real;
   minutes : double;
   seconds : double;
   sumdeg : double;
   radians : real;
begin
  writeln ('Enter degrees');
  readln(degrees);
  writeln('Enter minutes');
  readln(minutes);
  writeln('Enter seconds');
  readln(seconds);

  sumdeg := degrees + minutes/60 + seconds/3600;
  radians := sumdeg * (2 * 3.14159/360);
// radians:=((seconds/60 + minutes)/60 + degrees)/60 * 3.14/3;
  writeln('Radians');
  writeln(radians);


end.