Напечатать последовательность из натуральных чисел, образованную дробями в которой...

Question

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

Comments

Тогда в чём проблема? У меня на ABC.net запускается...

---

строка 6: Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла

---

Пожалуйста, обновите PascalABC.net

---

сегодня скачал

---

Работает: n = 301/1 1/2 2/3 3/5 5/8 8/13 13/21 21/34 34/55 55/89 89/144 144/233 233/377 377/610 610/987 987/1597 1597/2584 2584/4181 4181/6765 6765/10946 10946/17711 17711/28657 28657/46368 46368/75025 75025/121393 121393/196418 196418/317811 317811/514229 514229/832040 832040/1346269

---

Ошибка такая появляется, но с ней прога всё равно работает

---

у меня окно вывода появляется n=30

---

Можно написать и так...

---

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

---

спасибо огромное. тупанул

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.