решить задачу в паскале через рекурсию - вопрос №156380

Написать программу, вычисляющую первые n членов заданной последовательности: b1=0.5, b2=0.2, bn+1= (bn)2+bn-1/n

Лучший ответ по мнению автора

Program abc;
uses crt;
const
   n=10;
var
   b:array[1..n] of real;
   i:integer;
begin
  b[1]:=0.5;
  b[2]:=0.2;
  for i:=2 to n-1 do
    begin
       b[i+1]:=b[i]*2 + b[i-1]/n;
       writeln('b[',i+1,'] = ',b[i+1]);
    end;
  readln;
end.

05.12.11
Лучший ответ по мнению автора

Еva

Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store