задача по информатике

программирование обучение информатика задача

сложить модули синусов Pi/2,Pi/3,Pi/4.......Pi/20 。Случайно не 0.15707963267949 получается ??
Ответы:
Sum:=0; Pi=3.14;
For i:=2 to 20 Do
 Sum:=Sum+abs(sin(Pi/i));
var i : integer;
sum : real;
begin
sum:=0;
for i:=2 to 20 do sum:=sum+abs(sin(pi/i));


12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.