mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-15 22:50:40 +01:00
12 lines
143 B
ObjectPascal
12 lines
143 B
ObjectPascal
Uses Math;
|
|
|
|
Var
|
|
I : Integer;
|
|
|
|
Begin
|
|
For I := 0 To 359 Do
|
|
Begin
|
|
WriteLn( RadToDeg(ArcSin( DegToRad(Real(I)))):3:18);
|
|
End
|
|
End.
|