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

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

Viết chương trình in dãy n số fibonacy ?

Hướng dẫn:

- Sử dụng mảng M để chứa dãy n số fibonacy.Tạo lập 2 phần tử đầu tiên là 1, 1.

- Cho i chạy từ 3 đến n. M[i-1]+M[i-2].

- In n phần tử đầu tiên của mảng.

Nguyễn Lê Phước Thịnh
30 tháng 5 2020 lúc 20:51

Bài này dễ lắm đó bạn

uses crt;

var m:array[1..300]of longint;

i,n:integer;

begin

clrscr;

write('Nhap n='); readln(n);

m[1]:=1;

m[2]:=1;

i:=2;

repeat

i:=i+1;

m[i]:=m[i-1]+m[i-2];

until i=n;

for i:=1 to n do

write(m[i]:4);

readln;

end.


Các câu hỏi tương tự
Thiện
Xem chi tiết
Trần Huyền
Xem chi tiết
Trần Ngọc Nhã Linh
Xem chi tiết
Eriken
Xem chi tiết
nguyễn minh nguyệt
Xem chi tiết
Lê Quang Ngọc
Xem chi tiết
Eriken
Xem chi tiết
Ne Su
Xem chi tiết
trần Thị Mỹ Duyên
Xem chi tiết