Напечатать последовательность из N – натуральных чисел, образованную по следующему правилу: каждое число в последовательности, начиная с третьего, получается сложением двух предыдущих чисел.

//числа Фибоначчиvar x1, x2: longint;beginx1:=1;for var i:=1 to readinteger ('Введите N: ') dobeginx2:=x1+x2;x1:=x2-x1;print (x2);end;end.