Рекурентные вычисления - Turbo Pascal
Формулировка задачи:
1. Написать программу, вычисляющую первые n элементов заданной последовательности:
Код к задаче: «Рекурентные вычисления - Turbo Pascal»
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.
6 голосов, оценка 4.167 из 5
СОХРАНИТЬ ССЫЛКУ