Помогите составить программку в паскале. Дано естественное число n. Вычислить:

Помогите составить программку в паскале. Дано естественное число n. Вычислить: p=(1-1/2^2)(1-1/3^2)*...*(1-1/n^2), где ngt;2

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

думаю так.

 

var i,n:integer; p:real;
begin
cls;
write('write n '); readln(n);
for i:=2 to n do
begin
p:=p+(1-(1/sqr(i)));
end;
writeln(p);
readln;
end.

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


Последние вопросы

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

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

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

Войти на сайт