Bai tap Pascal lan 1

Bài tập 1: Viết chương trình nhập vào số nguyên N. In ra màn hình tất cả các ước số của N.
Ý tưởng:
Cho biến i chạy từ 1 tới N. Nếu N MOD i=0 thì viết i ra màn hình.
Bài tập 3.10: Viết chương trình tìm các số có 3 chữ số sao cho: = a3 + b3 + c3.
Ý tưởng:
Dùng phương pháp vét cạn. Ta biết rằng: a có thể có giá trị từ 1(9 (vì a là số hàng trăm), b,c có thể có giá trị từ 0(9. Ta sẽ dùng 3 vòng lặp FOR lồng nhau để duyệt qua tất cả các trường hợp của a,b,c.
Ứng với mỗi bộ abc, ta sẽ kiểm tra: Nếu 100.a + 10.b + c = a3 + b3 + c3 thì in ra bộ abc đó.
Bài tập 2: Viết chương trình nhập vào số tự nhiên N rồi thông báo lên màn hình số đó có phải là số nguyên tố hay không.
Ý tưởng:
N là số nguyên tố nếu N không có ước số nào từ 2 ( N div 2. Từ định nghĩa này ta đưa ra giải thuật:
- Đếm số ước số của N từ 2 ( N div 2 lưu vào biến d.
- Nếu d=0 thì N là số nguyên tố.

Bài tập 3: Viết chương trình in ra màn hình các giá trị của bảng mã ASCII từ 0(255.
Gợi ý:
Cho biến i chạy từ 0 ( 255. In ra màn hình i và CHR(i).
Bài tập 4: Viết chương trình in ra màn hình các số nguyên từ 1 đến 100 sao cho cứ 10 số thì xuống dòng.
Gợi ý:
Cho biến i chạy từ 1 ( 100. In ra màn hình i và kiểm tra: nếu i MOD 10=0 thì WRITELN.
Bài tập 5: Viết chương trình in ra màn hình bảng cữu chương.
Gợi ý:
Dùng 2 vòng lặp FOR lồng nhau: i là số bảng cữu chương (2...9), j là số thứ tự trong từng bảng cữu chương (1...10).
For i:=2 To 9 Do
For j:=1 To 10 Do Writeln(i,’x’,j,’=’,i*j);