Дано натуральное n. Вычислить 1/ 2* 3 / 4* 5 / 6*...*99/100
Дано натуральное n. Вычислить
1/ 2* 3 / 4* 5 / 6*...*99/100
Гость
Ответ(ы) на вопрос:
Гостьprogram gt;
var s,x:real;
begin
x:=1;
while x<=99 do
begin
s:=s+x/(x+1);
x:=x+2;
end;
writeln(s:1:5);
end.
:1:5-это 5 цифр после запятой
Не нашли ответ?
Похожие вопросы