Program AGA; var k, m, s, t, u, n, a, v, i:integer; var G:array [1..n, 1..n] of integer; B:array [1..n] of integer; begin readln (n); for i:=1 to n do begin for j:=1 to n do begin readln (G[i, j]); end; end; B[1]:=1; for k:=2 to n do B[k]:=0; k:=1; m:=0; begin while (k s:=1; for t:=1 to n do v:=1; for i:=1 to k do if B[i]=t then v:=0; if (v=1 and G(B[k-m], t)=1) then a:=t; s:=0; if (s=0) then { k:=k+1; B[k]:=a; m:=0;} else {m:=m+1;} for k:=1 to n do writeln(B[k], k); end; end.

В n будем хранить количество чисел, которые ещё нужно вывести. a и b - предыдущее и текущее числа Фибоначчи. По определению, следующее число Фибоначчи равно сумме двух предыдущих, так что новое значение b будет a + b. Чтобы не заводить новую временную переменную, новое значение a можно будет найти, вычитая из нового b старое a, получится (a + b) - a = b.

Код процедуры:

procedure print_fib(n: integer);

var a, b, t: integer;

begin

   a := 0;

   b := 1;

   while n > 0 do

   begin

       write(b, ' ');

       b := a + b;

       a := b - a;

       n := n - 1;

   end;

end;

Пример основной программы:

begin

   print_fib(10)

end.

Вывод:

1 1 2 3 5 8 13 21 34 55

ответ:1Материнская плата – это главная системная плата компьютера, на которой расположены разъемы для комплектующих к ПК. Таким образом она служит основой всей электронной схемы компьютера. Поэтому благодаря материнской плате обеспечивается идеальное взаимодействие компонентов компьютера между собой. 2 Они выполняют записываемое в заголовках протоколов транспортного уровня модели 3 компьютер4Модульный принцип позволяет потребителю самому комплектовать нужную ему конфигурацию компьютера и производить при необходимости ее модернизацию. ... Модульная организация компьютера опирается на магистральный (шинный) принцип обмена информацией между устройствами.

Объяснение:вроде так