Заполнить массив первыми числами Фибоначчи

@Mikailos · Регистрация: 31.01.2018

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

Заполнить массив первыми числами Фибоначчи. Пожалуйста, помогите с решением

@Cyborg Drone · 31.01.2018, 19:22

Pascal

const
  m = 46;
 
var
  a: array[1..m] of integer;
  n: integer;
 
begin
  a[1] := 1;
  a[2] := 1;
  for n := 3 to m do a[n] := a[n - 1] + a[n - 2];
  for n := 1 to m do write(a[n]:16)
end.

@Mikailos 0 / 0 / 0 Регистрация: 31.01.2018 Сообщений: 6
		1
	Заполнить массив первыми числами Фибоначчи 31.01.2018, 18:55. Показов 10846. Ответов 1 Метки нет (Все метки) Заполнить массив первыми числами Фибоначчи. Пожалуйста, помогите с решением 0

	31.01.2018, 19:22

Опции темы

Заполнить массив первыми числами Фибоначчи

Решение