P=(1+1/1)(1+1/2)...(1+1/N) составить программу вычисления. на языке паскаль.
P=(1+1/1)(1+1/2)...(1+1/N)
составить программу вычисления. на языке паскаль.
Гость
Ответ(ы) на вопрос:
Гостьvar p:real;
n,i:integer;
begin
readln (n);
p:=1;
for i:=1 to n do
p:=p*(1+(1/i));
writeln (p);
end.
Не нашли ответ?
Похожие вопросы