Числа Фибоначчи в Паскале

NAt · 19.01.2014, 20:55

здравствуйте, ув. программисты, подскажите пожалуйста с задачей:Дан одномерный массив. Вывести на экран только те элементы массива, индексы которых являются числами Фибоначчи.(1, 2, 3, 5, 8, 13, …).

Vladimir_S · 19.01.2014, 21:26

Легко.
Ввод массива А организуйте сами.
Дальше так:

Код:

write(A[1],' ');
i1:=1;
i2:=1;
i3:=2;
while i3<=N do
 begin
  write(A[i3],' ');
  i1:=i2;
  i2:=i3;
  i3:=i1+i2;
 end;

NAt · 23.01.2014, 00:01

спасибо большое)

19.01.2014, 20:55	#1 (permalink)
NAt Member Регистрация: 09.12.2012 Сообщений: 45 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Числа Фибоначчи в Паскале здравствуйте, ув. программисты, подскажите пожалуйста с задачей:Дан одномерный массив. Вывести на экран только те элементы массива, индексы которых являются числами Фибоначчи.(1, 2, 3, 5, 8, 13, …).

19.01.2014, 21:26	#2 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Легко. Ввод массива А организуйте сами. Дальше так: Код: write(A[1],' '); i1:=1; i2:=1; i3:=2; while i3<=N do begin write(A[i3],' '); i1:=i2; i2:=i3; i3:=i1+i2; end;

19.01.2014, 20:55
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Пожалуйста, ознакомьтесь с информацией по этим ссылкам Даны целые числа K и L Сумма чисел Фибоначчи Числа в Excel

23.01.2014, 00:01	#3 (permalink)
NAt Member Регистрация: 09.12.2012 Сообщений: 45 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	спасибо большое)

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070