Составить программу вычисления значения выражения

17.09.2012, 22:32. **Показов** 1366. **Ответов** 1

Author24 — интернет-сервис помощи студентам

@ЕленаБалакирева · 18.09.2012, 15:11

Pascal

var 
  st_x:real; {степень числа х}
  f: integer; {факториал}
  S: real; {сумма}
  n:integer;
  x:real;
 
begin
  writeln ('Vvedite n');
  readln (n);
  writeln ('Vvedite x');
  readln (x);
  st_x:=1;
  f:=1;
  for i:=1 to n do
    begin
      st_x:=st_x*x;
      f:=f*(i+1);
      s:=s+2*st_x/f;
    end;
  writeln ('Znachenie virazhenija = ', S:8:2);
  readln
end.

Alexandra09
		1
	Составить программу вычисления значения выражения 17.09.2012, 22:32. Показов 1366. Ответов 1 Метки нет (Все метки) Составить программу вычисления значения выражения Миниатюры

	18.09.2012, 15:11

Составить программу вычисления значения выражения

Решение