Напишите программу, вычисляющую и выводящкю 10 первых членов последовательности Фибоначчи

Числа Фибоначчи - это ряд натуральных чисел, которые расположены в такой числовой последовательности, что сумма последних целых чисел равна сумме двух предыдущих чисел. Пример: 1, 1, 2, 3, 5 и т. д. Этот ряд может продолжаться бесконечно. Напишем программу на языке программирования Pascal:

Program fibonahhi,

Var h1, h2, h,

Begin

h1:=1; h2:=1,

write (h1,' ', h2,' '),

for i:=3 to 10 do

begin

h:=h1 + h2;

write (,' '); h1:=h2;

h2:=h;

end;

writeln;

end.