Bài tập Pascal

CÁC BÀI TẬP PASCAL HAY
DÀNH CHO HS LỚP 8 - 9
BÀI 1 : .
Minh rất thích trò chơi xếp các chiếc hộp có hình viên gạch. Minh đặt các viên gạch chồng lên nhau và xây thành nhiều chồng có độ cao khác nhau. Minh khoe với chị rằng “Chị trông, em đã xây được một bức tường”. Chị của Minh trả lời “Em phải xếp các viên gạch có độ cao giống nhau mới được gọi là một bức tường”. Sau khi nghe chị nói như vậy nó cân nhắc một tí và cho rằng ý kiến ấy là đúng. Vì vậy em bắt đầu tiến hành sắp xếp lại các chồng gạch lần lượt từng chiếc một cho đến khi hoàn thành công việc. Khi công việc đã hoàn tất, Minh mệt lả và muốn có bạn nào giúp Minh di chuyển các viên gạch với số lần ít nhất.










Các chiếc hộp trước và sau khi xếp
Yêu cầu: Hãy lập trình đưa ra số lần di chuyển ít nhất của các viên gạch sao cho từ các chồng gạch có độ cao khác nhau trở thành các chồng gạch có độ cao bằng nhau; lần lượt từng chiếc một cho đến khi hoàn thành công việc.
Dữ liệu vào: có cấu trúc sau:
dòng đầu tiên là số n, n là số các chồng gạch,
dòng tiếp theo lần lượt là các hi, độ cao của chồng gạch thứ i. (1≤ n ≤ 50; 1≤ hi ≤ 100; i = 1..n). Lưu ý rằng số viên gạch bao giờ cũng chia hết cho số chồng gạch.
Dữ liệu ra: chỉ có một dòng chứa một số nguyên dương là kết quả tính toán số lần ít nhất sau khi xếp lại các chồng gạch. Nếu không có kết quả cũng phải ghi rõ “KHONG CAN DI CHUYEN LAN NAO”
Ví dụ: với hình trên ta có dữ liệu vào, ra:
Input
Output

6
5 2 4 1 7 5
5

7
9 9 9 9 9 9 9
Khong can di chuyen lan nao





BÀI 2: SẮP SỐ TRONG XÂU
Nhập một xâu s bao gồm số và kí tự, in ra xâu đã sắp xếp số theo thứ tự tăng dần còn vị trí các kí tự vẫn giữ nguyên?
Input
Output

abc6ghj7kkkkk1hhhh9
abc6ghj7kkkkk1hhhh9

BÀI 3: KÝ TỰ NHIỀU NHẤT
Nhập vào xâu s (a(z), in ra ký tự xuất hiện nhiều lần nhất trong xâu và số lần xuất hiện? Nếu có nhiều trường hợp thì in ra trường hợp đầu tiên. ví dụ:
Input
Output

abcaabca
a 4

bcbsaaba
b 3

BÀI 4: TỪ DÀI NHẤT
In ra từ dài nhất trong một xâu nhập từ bàn phím và số ký tự của từ này? Nếu có nhiều từ có độ dài bằng nhau thì in ra hết.
ví dụ:
Input
Output

Nguyen van truong
truong
4

Truong thich hoc pascal
Truong
pascal
5


BÀI 5: DÃY CON LỚN NHẤT
Cho một mảng số nguyên gồm n phần tử. Tìm dãy con gồm m phần tử (m(n) sao cho dãy con này có tổng lớn nhất. (Dãy con là dãy các phần tử liên tiếp nhau trong mảng).
nhập n, nhập các phần tử của dãy, nhập m, in ra dãy con có m phần tử.
Input
Output

8
4 3 5 2 8 7 9 6
3
8 7 9

BÀI 6: XOÁ KÝ TỰ TRÙNG
Viết chương trình nhập vào 1 xâu và xoá hết các ký tự liên tiếp giống nhau trong xâu chỉ chừa lại một?
Input
Output

cccccaaannnnooo
cano

yeseeeyysss
yeseys






BÀI 7: SỐ ĐƠN ĐIỆU
Các số nguyên dương 3748, 58, 859, 32435465768 được gọi là các số đơn điệu do nếu quan sát các chữ số của số này , ta thấy chúng luân phiên tăng giảm hoặc giảm tăng. Chẳng hạn:
3 < 7 > 4 < 8 và 3 > 2 < 4 > 3 < 5 > 4 < 6 > 5 < 7 > 6 < 8
Số chỉ có một chữ số là số đơn điệu chiều dài 1.
Hãy viết chương trình xác định số chữ số đầu tiên lớn nhất tạo thành số đơn điệu của một số cho trước.
Nhập vào một số nguyên dương không quá 75 chữ số.
Xuất ra số chữ số đầu tiên lớn nhất tạo thành số đơn điệu.
Input
Output

37486398
5

859672534163
12

BÀI 8: SỐ NGUYÊN TỐ GHÉP
Xét dãy A các số nguyên tố 2, 3, 5, 7, 11, 13, 17, 19,...
và dãy B gồm các số thu được từ dãy A bằng cách ghép hai số