55

Тема: Рекуррентные соотношения. Помогите пожалуйста написать программу для…

07 марта 2023

Тема: Рекуррентные соотношения. Помогите пожалуйста написать программу для вывода последовательности Условие: b1=5; bn=(-1) ^n*bn-1 -8 минус 1 в степени n, умножить на b n-1 (n-1 ->подстрочный текст) — 8

категория: информатика



56

varb1,b2,i,n,p: integer; beginwrite ('введите n'); readln (n); b1: =5; writeln ('1 элемент=', b1); p: =-1; for i: =2 to n dobeginp: =p*(-1); b2: =p*b1-8; writeln (i,' элемент=', b2); b1: =b2; end; end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...