Рекурентные вычисления - Turbo Pascal
Формулировка задачи:
1. Написать программу, вычисляющую первые n элементов заданной последовательности:
Решение задачи: «Рекурентные вычисления»
textual
Листинг программы
- var b,b1:real;
- n,i:integer;
- begin
- write('n=');
- readln(n);
- b1:=0.1;
- writeln(b1:0:15);
- for i:=2 to n do
- begin
- b:=(0.02+b1*b1*b1)/6;
- writeln(b:0:15);
- b1:=b;
- end;
- end.
Объяснение кода листинга программы
- Объявляются переменные b, b1:real; и n, i:integer;
- Выводится сообщение
n=и считывается значение переменной n. - Переменная b1 инициализируется значением 0.1.
- Выводится значение переменной b1:0:15.
- Запускается цикл for, который выполняется от 2 до n.
- Внутри цикла переменная b инициализируется значением (0.02+b1b1b1)/6.
- Выводится значение переменной b:0:15.
- Переменная b1 обновляется значением b.
- Цикл завершается.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
