Ответы
Ответ дал:
1
Program printFibonacci;
var A: array [1..20] of integer;
i: byte;
begin
A[1]:=1;
A[2]:=1;
for i:=3 to 20 do
begin
A[i]:=A[i-1]+A[i-2];
writeln ('A[i]=' A[i]);
end;
end.
Но я не уверен(
var A: array [1..20] of integer;
i: byte;
begin
A[1]:=1;
A[2]:=1;
for i:=3 to 20 do
begin
A[i]:=A[i-1]+A[i-2];
writeln ('A[i]=' A[i]);
end;
end.
Но я не уверен(
sabaca30:
Спасибо
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад