Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Определить периметр P правильного многоугольника если задан радиус вписанной окружности R и количество углов N:
P=N*A, где A=2*R*tg(180градусов/N).
Это все в программе Паскаль.Записать на языке ПАСКАЛЬ.

Ответ оставил Гость

//Pascal ABC.NET v3.1 сборка 1172

Var
 n:integer;
 r,p:real;
begin
 read(n,r);
 p:=n*2*r*tan(pi/n);
 writeln(p);
end.

Пример ввода:
6
4
Пример вывода:
27.712812921102