Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
padpirigov0
24.07.2021 15:27 •
Информатика
составить программу табулирования функции заданной рекурентной формулой. f(0)=1; f(1)=2; f(n+2)=2*f(n+1)-n
Показать ответ
Ответ:
BPAN321
10.07.2020 18:21
Function f(n:integer): integer;
begin
if n=0 then f := 1
else if n=1 then f := 2
else f := 2*f(n-1)-n+2;
end;
var n: integer;
begin
writeln('n':5, 'f(n)':10);
for n := 0 to 20 do
writeln(n:5, f(n):10);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lgep08jle
21.09.2020 11:13
, решить на питоне. 24 задание. не только ответ, а весь код Скачайте текстовый файл, состоящий не более чем из 106 символов A, B, C и D. Определите количество цепочек,...
frazka228
12.09.2020 06:19
памагите памагите эту задачу(...
andreyshilenko
18.01.2022 06:30
Распределите операторы языка Pascal по разделам программы: 1.Var 2. Const 3. Begin... end 1.x: integer; 2.g=9.8; 3.g: real; 4.Write( Введите целое число x ) 5.x=15;...
liza1329
18.11.2020 22:27
Дано описание массива. const T:array[1..5] fo integer=(20, 40, 60, 80, 100); Определите, какие из предложенных операторов являются допустимыми для элементов этого массива?...
Killerman68
16.08.2021 12:57
Как зделать задани 178 по украинскому языку Заболотный 5 клас...
Гульшат11111111
14.02.2021 09:32
Решите графически уравнение -√x= -x+2...
veronikaandruseiko
14.02.2021 09:32
При скрещивании высокорослого растения томата с карликовым получены высокорослые гибриды (доминантный признак). Каковы генотипы родителей? AA×aa aa×aa Aa×Aa Aa×aa...
djastin05
14.02.2021 09:32
НАДО «Изумруд» А Куприн1. Определите тему произведения. Какова главная мысль рассказа?2. Почему Куприн назвал своего героя Изумрудом? 3. Как в рассказе показаны люди...
nikemaxair55780
01.12.2020 03:53
ДИВИТИСЬ НА МАЛЮНОК. ів...
maksimka39
01.12.2020 03:53
самайды сөзінің синонимі тез тез көмек керек...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
if n=0 then f := 1
else if n=1 then f := 2
else f := 2*f(n-1)-n+2;
end;
var n: integer;
begin
writeln('n':5, 'f(n)':10);
for n := 0 to 20 do
writeln(n:5, f(n):10);
end.