Написать программу, вычисляющую первые n элементов - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Написать программу, вычисляющую первые n элементов заданной последо- вательности. Массив не использовать!

Решение задачи: «Написать программу, вычисляющую первые n элементов»

textual
Листинг программы
var b1,b2,b:real;
    n:integer;
begin
write('n=');
readln(n);
b1:=1;
b2:=3;
write(b1:0:2,' ',b2:0:2,' ');
for var i:=3 to n do
 begin
  b:=b1/(4*i)+(5*i-5)/sqr(b2);
  write(b:0:2,' ');
  b1:=b2;
  b2:=b;
 end;
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.6 из 5
Похожие ответы