guzelda19904850
?>

Вычислите n-й член последовательности, заданной формулами: a2n = an + an-1, a2n+1 = an – an-1, a0 = a1 = 1. входные данные вводится одно натуральное число n (1≤n≤1000 выходные данные вывести одно число an.

Информатика

Ответы

Latsukirina
Var i,n,k: integer;
    a: array[0..1000] of integer;
begin
  write('n = ');  readln(n);
  a[0]:=1;  a[1]:=1;
  i:=2;
  repeat
    k:=i div 2;
    if (i mod 2) = 0 then a[i]:=a[k]+a[k-1]
    else a[i]:=a[k]-a[k-1];
    i:=i+1;
  until i>n;
  writeln('a(n) = ',a[n]);
end.
pavelriga5
1. 2 Массивы объявляются тем же оператором, что и обычные переменные
2. Не корректный вопрос: индекс - это обращения к определенному элементу массива, а у самого массива индекса нет. В вариантах ответа ничего похожего на это нет.
3. 4 Массивы заполняются теми же операторами, что и обычные переменные
4. 1 Есть такой ввода в бейсике - конструкция READ DATA
5. 1 Выведется четвертый элемент массива, т.к. нумерация идет с нуля, и первый имеет номер 0, второй - 1, третий - 2, а четвертый - номер 3, который и запрашивается в выражении А(3)
pak1998378

Не знаю можно ли считать ноль, как "мінімальне додатнє", потому не включала

Объяснение:

#include<iostream>

using namespace std;

int main()

{

int l[15];

double min=0,max=0;

for(int i=0;i<15;i++)

{

   cin>>l[i];

   if(l[i]>0&&l[i]<min&&min!=0)

       min=l[i];

       if(min==0&&l[i]>0)

           min=l[i];

   if(l[i]<0&&l[i]>max&&max!=0)

       max=l[i];

       if(max==0&&l[i]<0)

           max=l[i];

}

sort(l,l+15);

cout<<min<<" "<<max<<endl;

cout<<min/max<<endl;

for(int i=14;i>=0;i--)

   cout<<l[i]<<" ";

   return 0;

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Вычислите n-й член последовательности, заданной формулами: a2n = an + an-1, a2n+1 = an – an-1, a0 = a1 = 1. входные данные вводится одно натуральное число n (1≤n≤1000 выходные данные вывести одно число an.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

vkaloshin
Сергей_Евгеньевич1255
ele922009226536
Platon
Антон
shurshin6975
Акимцева27
lanac3po
yuklimochkina3
Kondratev Ruzavina22
best00
alexandr25901
dionissia2
Ruslan Zarekovkin
kuharchuks