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

Question

Информатика

Володюха

7 сентября, 20:03

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

+2

Ответы (1)

Знаете ответ на вопрос?

Марат · Answer 1

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.