В последовательности каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. Найти n- ый элемент

@Magnificent · Регистрация: 26.06.2013

Студворк — интернет-сервис помощи студентам

2) В последовательности (1 2 3 , , , ..., n) a каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. Найти n-ый элемент последовательности.
Детали реализации: при реализации решения массивы, множества и строки использовать нельзя!

@Kordn · 26.06.2013, 16:52

Сообщение от Magnificent

2) В последовательности (1 2 3 , , , ..., n) a каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. Найти n-ый элемент последовательности.
Детали реализации: при реализации решения массивы, множества и строки использовать нельзя!

Pascal

var
  n: integer;
 
function Seq(n: integer): integer;
begin
  if n < 4 then result := n
  else result := (Seq(n - 3) + Seq(n - 2) + Seq(n - 1)) mod 10;
end;
 
begin
  write('Введите номер элемента последовательности: ');
  readln(n);
  writeln('Элемент под номером ', n, ': ', Seq(n));
end.

@Magnificent · 29.06.2013, 11:14 **[ТС]**

вторая программа некорректно работает. т.е. у Вас не учтено, что четвертый член последовательности зависит от трех предыдущих, т.е. нужен еще ввод как минимум трех первых членов последовательности (в задании нигде не сказано что они равны 1, 2, 3) и дальнейший расчет на основании их суммы. Заранее спасибо!

Добавлено через 13 минут
моё сообщение было отредактированно, там должно было быть, a1,a2,a3....a(n)

@volvo · 29.06.2013, 14:17

@Magnificent, значит, вот так:

Pascal

var
  a1, a2, a3 : Integer;
  n: integer;
 
function Seq(n: integer): integer;
begin
  case n of
    1 : result := a1;
    2 : result := a2;
    3 : result := a3;
    else
      result := (Seq(n - 3) + Seq(n - 2) + Seq(n - 1)) mod 10;
   end;
end;
 
begin
  write('Введите первые три элемента:'); 
  readln(a1, a2, a3);
  write('Введите номер элемента последовательности: ');
  readln(n);
  writeln('Элемент под номером ', n, ': ', Seq(n));
end.

@Puporev · 29.06.2013, 16:08

Вроде так написано....

Сообщение от Magnificent

a каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих.

@Erea · 29.06.2013, 16:21

Возможно, первые три члена будут состоять не из одной цифры. Тогда можно на всякий случай сделать так:

Pascal

1	while n>=10 do n mod 10;

@volvo · 29.06.2013, 17:28

Сообщение от Erea

Возможно, первые три члена будут состоять не из одной цифры

И что? Хоть из 8 цифр... Меня не интересует, из скольки цифр состоят первые 3 члена, меня интересует последняя цифра их суммы...

Сообщение от Erea

Тогда можно на всякий случай сделать так

При чем тут n вообще? Если я заказывал 25-ый элемент последовательности, не надо пытаться подсунуть мне 5-ый...

@Erea · 29.06.2013, 18:34

Жара, торможу, почему-то переклинило, что мод 10 отрежет только первую цифру. (Да и под n имела в виду результат функции)

@Magnificent 0 / 0 / 1 Регистрация: 26.06.2013 Сообщений: 24
		1
	В последовательности каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. Найти n- ый элемент 26.06.2013, 13:43. Показов 3582. Ответов 7 Метки нет (Все метки) 2) В последовательности (1 2 3 , , , ..., n) a каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. Найти n-ый элемент последовательности. Детали реализации: при реализации решения массивы, множества и строки использовать нельзя! 0

@Magnificent 0 / 0 / 1 Регистрация: 26.06.2013 Сообщений: 24
	29.06.2013, 11:14 [ТС]	3
	вторая программа некорректно работает. т.е. у Вас не учтено, что четвертый член последовательности зависит от трех предыдущих, т.е. нужен еще ввод как минимум трех первых членов последовательности (в задании нигде не сказано что они равны 1, 2, 3) и дальнейший расчет на основании их суммы. Заранее спасибо! Добавлено через 13 минут моё сообщение было отредактированно, там должно было быть, a1,a2,a3....a(n) 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	29.06.2013, 16:08	5
	Вроде так написано.... Сообщение от Magnificent a каждый член, начиная с четвертого, равен последней цифре суммы трех предыдущих. 0

@volvo Супер-модератор 32764 / 21109 / 8139 Регистрация: 22.10.2011 Сообщений: 36,363 Записей в блоге: 8
	29.06.2013, 17:28	7
	Сообщение от Erea Возможно, первые три члена будут состоять не из одной цифры И что? Хоть из 8 цифр... Меня не интересует, из скольки цифр состоят первые 3 члена, меня интересует последняя цифра их суммы... Сообщение от Erea Тогда можно на всякий случай сделать так При чем тут n вообще? Если я заказывал 25-ый элемент последовательности, не надо пытаться подсунуть мне 5-ый... 0

@Erea 130 / 54 / 27 Регистрация: 13.03.2013 Сообщений: 162
	29.06.2013, 18:34	8
	Жара, торможу, почему-то переклинило, что мод 10 отрежет только первую цифру. (Да и под n имела в виду результат функции) 0

Опции темы