ПОЖАЛУЙСТА СРОЧНО!
Составить программу на паскале перевода радианной меры угла в градусы, минуты, секунды.
Ответы
Ответ дал:
0
Var
A:real;
Begin
Read(A);
A:=A*180/Pi;
WriteLn('Градусы: ',A:0:0);
WriteLn('Минуты: ',(A/60):0:0);
WriteLn('Секунды: ',(A/3600):0:0);
End.
A:real;
Begin
Read(A);
A:=A*180/Pi;
WriteLn('Градусы: ',A:0:0);
WriteLn('Минуты: ',(A/60):0:0);
WriteLn('Секунды: ',(A/3600):0:0);
End.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад