Question

напечатать последовательность из натуральных чисел, образованную дробями в которой числитель следующего члена последовательности получается сложением числителей , а знаменатель - сложением знаменателей двух предыдущих членов. Числитель первых двух членов равны 1, знаменатели равны 1 и 2 (1/1,1/2, 2/3, 3/5,...)
пожалуйста можете дать более развернутый ответ, а то я вообще не понимаю паскаль

Answer 1

Var A,B,D,n:integer;
Begin
Write('n = ');ReadLn(n);
A:=1;
B:=1;
For n:= 1 to n do
    Begin
    D:=A;
    A:=A+B;
    Swap(A,B);
    Write(D,'/',A,' ');
    End;
End.