Дано натуральное число n вычислить

1/13/25/3 * ... * 90 / 50

Question

Вечеслав

28 мая, 16:58

+2

Ответы (1)

Знаете ответ на вопрос?

Меркурия · Answer 1

Program gt;

var s:real;

a, b:integer;

begin

a:=1; b:=1;

s:=0;

while a<=90 do

begin

s:=s+a/b;

a:=a+2; b:=b+1;

end;

writeln (s) ;

end.

Дано натуральное число n вычислить1/1*3/2*5/3 * ... * 90 / 50