Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Yuramius
0 / 0 / 0
Регистрация: 20.04.2017
Сообщений: 19
1

Найти n членов последовательности, вычисляемых по формуле xk =xk-1+xk-3

24.04.2017, 20:30. Просмотров 906. Ответов 2
Метки нет (Все метки)

выручите пожалуйста! Очень буду признателен! Есть два задания, на которые тямы пока не хватает:

1) Pascal цикл for - Найти n членов последовательности, вычисляемых по формуле xk
=xk-1+xk-3, где ее начальные значения: x1 =x2 =x3 =1.

2)
 Комментарий модератора 
Удалено модератором
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.04.2017, 20:30
Ответы с готовыми решениями:

Вычислить сумму чисел в последовательности, вычисляемых по формуле А=К+1/К
Составить схему алгоритма и написать программу, вычисляющую сумму чисел в...

Найти число членов последовательности b1..b40, больших ср. арифметического всех членов последоват. а1..a50
Даны две целочисленные последовательности а1… а50 и b1…b40. Определить число...

Найти количество членов последовательности
последовательность действительных чисел оканчивается нулем. Найти количество...

Найти количество членов последовательности
написать программу вычисляющую сколько членов последовательности необходимо,что...

Найти сумму k первых членов последовательности
Помогите пожалуйста с 2 задачками + блок-схемы к ним. Разумную цену оплачу на...

2
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4216 / 3064 / 3789
Регистрация: 05.06.2014
Сообщений: 15,397
24.04.2017, 21:18 2
Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема.
http://www.cyberforum.ru/announcement.php?a=3
0
Hitoku
Модератор
1705 / 1304 / 1400
Регистрация: 28.10.2016
Сообщений: 4,240
Завершенные тесты: 4
26.04.2017, 13:21 3
Лучший ответ Сообщение было отмечено Yuramius как решение

Решение

Pascal
1
2
3
4
5
6
7
begin
  var x: array of integer;
  SetLength(x, ReadlnInteger('n ='));
  for var i := 0 to x.Length - 1 do
    x[i] := (i > 2 ? x[i - 1] + x[i - 3] : 1);
  x.Print;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.04.2017, 13:21

Найти среднее арифметическое положтельных членов последовательности
Найти среднее арифметическое положтельных членов последовательности...

Найти разность первых n членов числовой последовательности
задание "Найти разность первых n членов числовой последовательности, первый...

Найти разность первых n членов числовой последовательности
возникла проблема в рекурсивном вычитании, прошу указать, в чем ошибка....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru