Question

ДАМ МНОГО БАЛЛОВ!!!написать программу как в паскале к задачеЖ
вывести ряд фибоначи до n члена

Answer 1

Ответ:

Объяснение:

Должно быть так:

program rows;

var

   a,b,c,i,n: integer;

begin

   write('n = ');

   readln(n);

   a := 0;

   write(a,' ');

   b := 1;

   write(b,' ');

   for i:=3 to n do begin

       write(a+b,' ');

       c := b;

       b := a + b;

       a := c

   end;

readln

end.