Bài tập pascal

Bài tập

1.      Viết chương trình đảo ngược một số có 3 chữ số.

VD:  số 379 được đảo thành 973

2  Viết chương trình nhập vào một số nguyên dương, cho biết số đó có phải là bội số của 5 hay không?

3Tìm các số có 4 chữ số abcd sao cho:

abcd = (ab+cd)²
VD: 3025 = (30 + 25)²

^_Dãy số Fibonaci được xác định như sau:

F(0) = 0, F(1) = 1

F(n) = F(n-1) + F(n-2)

VD: Một vài số hạng của dãy : 0,1,1,2,3,5,8,13,…

a.       Viết chương trình in ra k số Fibonai đầu tiên, với k nhập từ bàn phím.

b.      Viết chương trình in ra 20 số Fibonaci lẻ đầu tiên.

5. Tính giá trị trung bình của một dãy số thực, dãy số kết thúc với giá trị = -1
   
   
6. Viết chương trình đếm số chữ số của một số nguyên N
   
   
7. Viết chương trình in ra 5 số nguyên dương sao cho khi đổi sang hệ nhị phân có tổng số các số 1 bằng k nguyên dương cho trước.
   
   
8. Có n số tự nhiên, hãy đưa ra các số chẳn không chia hết cho 3
   
   
9. Số tự nhiên được gọi là hoàn thiện khi nó bằng tổng tất cả các ước số của nó (nhỏ hơn nó) kể cả số 1. Viết chương trình in ra tất cả các số hoàn thiện nhỏ hơn số n cho trước.
   
   
10. Viết chương trình phân tích một số nguyên n thành tích các số nguyên tố

Cố gắng làm nha co trong bài TEst đó