const
n = 10;
var
a: array [1..n] of integer;
begin
a[1] := 1;
a[2] := 2;
write(1 2 );
for i: integer := 3 to n do
begin
a[i] := a[i - 2] + a[i - 1];
write(a[i], );
end;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.