Помогите решить паскаль! вычислить с помощью оператора цикла сумму и произведение последовательности чисел 1 , 1/3 , 1/9,...., 1/243
Помогите решить паскаль!
вычислить с помощью оператора цикла сумму и произведение последовательности чисел
1 , 1/3 , 1/9,...., 1/243
Ответ(ы) на вопрос:
Эта последовательность образована путем последовательного деления единицы на три в нулевой, первой, второй и т.д., до 5, степени.
[latex]\displaystyle \frac{1}{3^0}, \ \frac{1}{3^1}, \ \frac{1}{3^2}, \ \frac{1}{3^3}, \ \frac{1}{3^4}, \ \frac{1}{3^5} [/latex]
Во вложении приведены контрольные значения, полученный с помощью программы компьютерной математики Maple15.
var
i:integer;
s,p,k:real;
begin
s:=0; p:=1; k:=1;
for i:=0 to 5 do begin s:=s+k; p:=p*k; k:=k/3 end;
Writeln('S=',s,', П=',p)
end.
Результат
S=1.49794238683128, П=6.96917193762563E-08
Не нашли ответ?
Похожие вопросы