Есть ответ 👍

Найдите произведение ряда 1*1/2*1/3*//*1/n, n вводит пользователь. программирование паскаль.

235
323
Посмотреть ответы 3

Ответы на вопрос:


Var p: real; n: integer; begin p: =1; write('n = '); readln(n); for n: = 1 to n do p: =p/n; writeln('произведение ряда равно ',p) end.

Var n,i: integer; p: real; begin writeln ('n='); readln(n); p: =1; for i: =1 to n do p: =p*1/i; writeln('p=',p); readln; end.
Yuiyuii
4,4(54 оценок)

1) не жрать 2) слушать 3) шарить

Популярно: Информатика