Дано натуральное число n. Вычислить P = (1-)(1-) ... (1-) , где n> 2 . Если можно, то напишите на языке ПАСКАЛЯ.

Var n:integer;
p:real;
begin
p:=1;
writeln(введи n>2);
readln(n);
for i:=2 to n do
p:=p*(1-1/(sqr(i)));
writeln(p);
readln;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.