Viết chương trình pascal nhập vào một số N

Viết chương trình pascal nhập vào một số N. Xuất ra số Fibonanci thứ N (Dãy Fibonacnci là 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, ...)