Опубликовано 4 года назад по предмету Информатика от kariw7

Дано целое число N (N>1). Сформировать и вывести целочисленную последовательность из N чисел Фибоначчи по правилу: первые 2 элемента равны 1, а каждое следующее, начиная с третьего, равно сумме двух предыдущих.

Ответ

Ответ дан kosmonavtom

// Примечание: В задании не сказало создать массив, мы его и не создаем!
program fibonachi;
var n, x1, x2, xs, i:integer;
beginx1:=1;
x2:=1;
write ('Введите число N = ');
readln (n);
write (x1, ' ', x2, ' ');
for i:=3 to n do
begin
xs:=x1+x2;
write (xs, ' ');
x1:=x2;
x2:=xs;
end;
end.
Ответ

Ответ дан ff923

program z;
var a:array[1..1000] of integer; i,n:integer;
begin
write('Введите N (N>1, N<=1000)');
read(n);
a[1]:=1;
a[2]:=1;
write(a[1], ' ', a[2], ' ');
for i:=3 to n do
begin
a[i]:=a[i-2]+a[i-1];
write(a[i], ' ');
end;
end.
1. Ответ
  
  Ответ дан kosmonavtom
  
  Ну вот с массивом. Правда тут ограничение на 1000 чисел

Самые новые вопросы

Другие предметы - 4 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Другие предметы - 4 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

История - 4 года назад

Кто такой мильтиад и какова его роль в победе над персами?

История - 4 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

География - 4 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают