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

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

Question

Натала

22 августа, 09:53

+3

Ответы (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