Pascal

Написать программу с использованием цикла с параметром.

Дано целое число n (>0). Найдите произведение 1/64/11 ... * N^2 / (n^2+2n+3) (вещественное число)

Question

Артема

15 июля, 11:20

+2

Ответы (1)

Знаешь ответ?

Галюня · Answer 1

Var i, p, n:integer;

begin

readln (i); p:=1;

for n:=1 to i do

p:=p*n^2 / (n^2+2n+3);

writeln (p);

не уверен но должно работать ...

PascalНаписать программу с использованием цикла с параметром.Дано целое число n (>0). Найдите произведение 1/6*4/11 * ... * N^2 / (n^2+2n+3) (вещественное число)