Viết chương trình (Pascal/C++) xuất ra dãy Fibonacci từ 1 đến n

Question

Viết chương trình (Pascal/C++) xuất ra tất cả các số a[i] là số Fibonacci sao cho 0 < a[i] <= n, với n nhập từ bàn phím.

Comments

Ảnh của bài viết dưới đây nhé,mình bổ sung.

Answer 1

Program Hotboy;

Uses crt;

Var n,F,F1,F2 : longint;

Begin

Write('nhap tu ban phim so n'); 

Readlb(n);

F1:=1; F2:=1; 

Writeln(F1,';',F2);

Repeat 

F:=F1+ F2; 

If F

F2:=F1; F1:=F;

Until F>n ;

Readln

End.

Comments

Cái đoạn until mình ko biết câu lệnh này! Nhìn lạ quá nhưng mình tôn trọng sự nỗ lực của bạn

---

mình vẽ bảng rồi nha,đợi duyệt xíu

---

Cảm ơn bạn nhiều <3