Информатика, PascalABC, написать программу: Вычислить площадь и периметр правильного N-угольника, описанного около окружности радиуса R (рассмотреть N-целого типа, R-вещественного типа)

Информатика, PascalABC, написать программу: Вычислить площадь и периметр правильного N-угольника, описанного около окружности радиуса R (рассмотреть N-целого типа, R-вещественного типа)
Гость
Ответ(ы) на вопрос:
Гость
var n:integer;   s,p,r:real; begin   readln(n,r);   p:=2*n*tan(Pi/n);   s:=p*r/2;   writeln( 'Периметр ', p);   writeln( 'Площадь  ', s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы