Предмет: Информатика, автор: Morkoshechka

Тема:Рекуррентные соотношения.

Помогите пожалуйста написать программу для вывода последовательности

Условие: b1=5; bn=(-1)^n * bn-1 -8

минус 1 в степени n, умножить на b n-1 (n-1 ->подстрочный текст) - 8

 

Начинаю писать программу, а в степень без понятия как возвести

 

program posledovatelnost;
uses crt;
var i,n:integer; b1,bn:real;
begin clrscr;
writeln ('введите n');
readln (n);
b1:=5;
writeln ('1 элемент = ', b1);
for i:=2 to n do
begin
bn:=...
writeln (i, 'элемент = ', bn);
b1:=bn;
end;
readln
end.

 

что написать, чтобы считать правильно bn, нужно чтобы работало в TP, поэтому power,pow и exp бесполезны.

Ответы

Автор ответа: sinbad7
0

var

b1,b2,i,n,p:integer;

begin

write('введите n');
readln (n);
b1:=5;
writeln ('1 элемент = ', b1);

p:=-1;

for i:=2 to n do

begin

p:=p*(-1);

b2:=p*b1-8;

writeln (i,' элемент = ', b2);

b1:=b2;

end;

end.

Похожие вопросы
Предмет: Физика, автор: marcharussia
Даю 58 баллов за все
1. Какое количество теплоты получает кусочек льда массой 2 кг при его нагревании от –200C до 00C? Какое количество теплоты получает вода массой 2 кг при ее нагревании от 150C до 750C? Во сколько раз отличаются полученные значения?
2. Смешали три однородных жидкости одинаковой массы с температурами 60C, 300C и 600C. Определите общую температуру смеси. Во сколько раз увеличится масса всей смеси при смешивании трех жидкостей?
3. В травяной отвар массой 400 г и температурой 800C добавили холодную воду массой 200 г и температурой 200C. Чему будет равна температура всей смеси? Считать удельную теплоемкость травяного отвара и холодной воды одинаковой.
4. В травяной отвар массой 500 г и температурой 700C добавили холодную воду массой 100 г и температурой 100C. Чему будет равна температура всей смеси? Считать удельную теплоемкость травяного отвара и холодной воды одинаковой.