Вычисление чисел фибоначчи (паскаль) а[1]=1 а[2]=1 а[3]=2 а[4]=3 а[5]=5 а[6]=8

Pentianоs Pentianоs    3   06.06.2019 09:50    0

Ответы
babyirishka21 babyirishka21  01.10.2020 20:31
Program Fib;
var a:array [0..100] of integer;
      i,n:integer;
      begin
              a[1]:=1;
              a[2]:=1;
              for i:=3 to 100 do
              begin
              a[i]:=a[i-1]+a[i-2];
               Write('a[',i,'] = ',a[i],'   ');
               end;
      end.         
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика