СОСТАВЬТЕ Программку В ПАСКАЛЬ ДЛЯ ВЫЧИСЛЕНИЯ:Отыскать радиус окружности, описанной около

СОСТАВЬТЕ ПРОГРАММУ В ПАСКАЛЬ ДЛЯ ВЫЧИСЛЕНИЯ:
Отыскать радиус окружности, описанной около правильного n-угольника со стороной а

Задать свой вопрос
1 ответ

var

   n : integer; // количество сторон (углов)

   a : integer; // длина стороны

   

begin

   write('введите количество сторон n= ');

   readln(n);

   write('введите длину стороны a= ');

   readln(a);

   writeln('радиус описанной окружности R=', a/2*(sin(pi/n)));

end.

не забываем что паскаль считает в радианах и формула расчета соответственная...

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт