Tuyển Cộng tác viên Hoc24 nhiệm kì 26 tại đây: https://forms.gle/dK3zGK3LHFrgvTkJ6

Lập trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hồ Hoàng Long

Pascal: Hãy viết chương trình nhập từ bàn phím số nguyên n và tính giá trị của số hạng thứ n của dãy Fibonacci.

Nhật Văn
14 tháng 2 2023 lúc 20:50

Program ........... ;
Uses crt;
Var
N,i : word;
F, F1, F2 : word;
Begin
Clrscr;
Repeat
Writeln('Tim so hang thu N cua day Fibonaxi, Nĩ='));
Readln(N);
If N<=2 then writeln(’Moi nhap lai !');
Until N>2 F1:= 1 F2:= 2 for i:= 3 to N do
Begin
F := F1 + F2;
Fl := F2;
F2 := F;
End;
Writeln('So fibonaxi thu', N: 5, ' la ’, F: 10);
Readln;
End.


Các câu hỏi tương tự
dinhnguyentuhuy
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết
Nguyễn Linh
Xem chi tiết
haizzz!!
Xem chi tiết
Yeu DUong nhat
Xem chi tiết
Quỳnh
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết
Bbi thành real
Xem chi tiết
Phạm Thị Kim Anh
Xem chi tiết