Вычислить значение выражения

@Леша Сатаев · Регистрация: 22.01.2015

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

задания нет но есть фомула и решение в решении ошибка надо найти

@Puporev · 22.01.2015, 17:35

Тупость беспросветная. Неужели так сложно написать формулу и вставит скопированный из окна АВС текст?
Где уж там писать программы...

Добавлено через 4 минуты
Хоть бы условие правильно написали, а то если от одного, то 1/(1!-1) не определено, ибо это деление на 0.

@Joy · 23.01.2015, 11:31

да у него там: $https://www.cyberforum.ru/cgi-bin/latex.cgi?a_i=\frac{1}{i!-i}$

Добавлено через 30 минут

Pascal

var i,n:integer;
    f,s,r:real; 
begin
  write('Введите n:');
  Readln(n);
  f:=1;
  s:=0;
  for i:=1 to n do begin
    f:=f*i;
    if f-i>0 then begin
      r:=1/(f-i);
      s:=s+r;
      writeln('a[',i:2,']=',r:0:7);
    end else writeln('a[',i:2,']=не определено');  
  end;
  writeln('S=',s);
end.

@Леша Сатаев 0 / 0 / 0 Регистрация: 22.01.2015 Сообщений: 1
		1
	Вычислить значение выражения 22.01.2015, 15:07. Показов 1007. Ответов 2 Метки нет (Все метки) задания нет но есть фомула и решение в решении ошибка надо найти 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	22.01.2015, 17:35	2
	Тупость беспросветная. Неужели так сложно написать формулу и вставит скопированный из окна АВС текст? Где уж там писать программы... Добавлено через 4 минуты Хоть бы условие правильно написали, а то если от одного, то 1/(1!-1) не определено, ибо это деление на 0. 0

	23.01.2015, 11:31

Вычислить значение выражения

Решение