Помогите написать программу на паскале ABC. 1)Вычислить периметр и площадь правильного n-угольника, описанного около окружности радиуса R.
Answers & Comments
pro100boss911
Program Main; Var n,R,P,S:Real; Begin Readln(R,n); P:=(n*2*R*(sin(180)\cos(180))\n; S:=1\2*P*R; End. Всякие там выводы на экран, сами сделаете)
Answers & Comments
Var n,R,P,S:Real;
Begin
Readln(R,n);
P:=(n*2*R*(sin(180)\cos(180))\n;
S:=1\2*P*R;
End.
Всякие там выводы на экран, сами сделаете)