Dãy Fibonacy có hai phần tử đầu là 1, 1. Các phần tử sau bằng tổng hai phần tử
đứng ngay trước nó: 1, 1, 2, 3, 5, 8, 13, 21, …
Viết chương trình in ra dãy Fibonacy có phần tử lớn nhất nhỏ hơn n?
Dãy Fibonacy có hai phần tử đầu là 1, 1. Các phần tử sau bằng tổng hai phần tử đứng ngay trước nó: 1, 1, 2, 3, 5, 8, 13, 21, … Viết chương trình in
By Aaliyah
Hướng dẫn:
– Cần hai biến F_1 và F có giá trị đầu là 1, 1.
– Thực hiện lặp cho đến khi F >= n.
– Do yêu cầu chỉ in các số bé hơn n nên khi in cần thêm một lệnh kiểm tra.
.Mã chương trình:
Program Fi_Bo_na_xi;
Var n, F_2,F_1, F: Longint;
Begin
Write(‘Nhap n: ‘);Readln(n);
F_1:=1; F_2:=1;
Write(F_2,’;’,F_1,’;’);
Repeat
F:=F_2+F_1; if F< n then Write(F,’;’);
F_2:=F_1; F_1:=F;
Until F>n;
chúc bn hc tốt @ nguyễn thanh bảo kha @ love you
Đáp án:
Hướng dẫn:
– Cần hai biến F_1 và F có giá trị đầu là 1, 1.
– Thực hiện lặp cho đến khi F >= n.
– Do yêu cầu chỉ in các số bé hơn n nên khi in cần thêm một lệnh kiểm tra.
.Mã chương trình:
Program Fi_Bo_na_xi;
Var n, F_2,F_1, F: Longint;
Begin
Write(‘Nhap n: ‘);Readln(n);
F_1:=1; F_2:=1;
Write(F_2,’;’,F_1,’;’);
Repeat
F:=F_2+F_1; if F< n then Write(F,’;’);
F_2:=F_1; F_1:=F;
Until F>n
Chúc bạn có một ngày vui vẻ, sức khỏe dồi dào và luôn được điểm 10.