Bài tập Pascal

♥ Bài Tập Pascal 1208 ♥

|

Đây là những bài tập mang tính cơ bản, nhưng sau khi lập trình bạn sẽ thấy nó hấp dẫn.

Bài 1: Đọc một số nguyên dương n từ file number.inp. Nếu n là số lẻ thì trừ 1 vào n,

ngược lại tăng 1 vào n. Ghi n vào file number.out

Bài 2: Đọc 2 số integer a,b từ bàn phím. Nếu tổng chúng khác 0 thì trừ 1 vào số nhỏ và

cộng 1 vào số lớn. Xuất a,b ra màn hình.

Bài 3: Cho v, t lần lượt điểm trung bình của môn văn và môn toán, đọc vào từ bàn phím.

Hãy hoán vị v, t cho nhau. Xuất v, t ra màn hình. (yêu cầu không dùng biến trung gian, có

nhiều cách rất hay đấy)

Bài 4: Đọc vào từ bàn phím những con số nguyên dương bé hơn hoặc bằng maxint, đến khi

người dùng nhập vào không phải số nguyên dương thì xuất ra giá trị lớn nhất ra màn hình.

Bài 5: Đọc vào 1 số longint từ bàn phím. Không dùng thêm biến nào, xuất ra màn hình số

chữ số của số đó (có nhiều cách)

Bài 6: Viết trò chơi đoán số. Người dùng nghĩ ra một số từ 0 đến 10. Máy được phép

đoán 4 lần (với mỗi lần đoán người chơi sẽ gợi ý: lớn quá (bằng cách nhập vào chữ L), nhỏ

quá (chữ N), chính xác (chữ C) ). Hãy giúp máy đoán chính xác.

Với mỗi bài người đưa ra chương trình đúng đầu tiên được 10 điểm, nếu người sau đưa ra

cách đúng khác vẫn được 10 điểm. Những chương trình giải quyết được 1 phần vấn đề,

vẫn có điểm khuyến khích. (Được sự giúp đỡ của BQT, chân thành cảm ơn).

Hihi. Đây là topic đầu của KeMatLanh với mong muốn các bạn trao dồi kiến thức, và box

Tin học sôi nổi hơn. Các bạn ủng hộ nhé.

I_love_IT 12:08:26 Ngày 24-11-2008

Trả lời: ♥ Bài Tập Pascal 1208 ♥

| Bài này được '.QuangHuy91.' cho '.3.' điểm

Đang bận, thử làm bài 1 nhé

uses crt;

var n:integer;