Составить программу перевода (в паскале) радианной меры угла в градусы, минуты и секунды.

Program convert; var  num: real; result: real; begin  write('введи значение в радианах: ');   readln(num);   result: = num * 57.29;   writeln('градусы: ',result);   result: = num * 3437.75;   writeln('минуты: ',result);   result: = num * 206264.99;   writeln('секунды: ',result); end.

если под ячейкой поодразумевается байт (восемь бит) то:

(для беззнаковых (натуральных с нулём) )

или

- (для знаковых (целых) )