- Khai báo trực tiếp trong khai báo biến
4. Một số chương trình con của turbo pascal
Pascal ựã xây dựng sẵn một số hàm và thủ thục, Ta có thể gọi tới các hàm, thủ tục ựó theo
ựúng quy cách của nó ựể sử dụng.
Ngoài các hàn và thủ tục ựã xét ở các phần trên, trong phần này bổ sung thêm một số thủ tục sau ựây:
* Procedure GotoXY(Xpos, YPos);
đưa con trỏ(cursor) của màn hình về vị trắ có toạ ựộ Xpos và Ypos trên màn hình. Xpos, Ypos kiểu số nguyên.
* Procedure ClrScr;
Xoá toàn bộ màn hình và ựặt con trỏ vào vị trắ phắa trên, bên trái.
* Procedure ClrEof;
Xoá toàn bộ các kắ tự bên phải con trỏ màn hình. Sau khi xoá con trỏ vẫn ở tại chỗ.
* Procedure Deline;
Xoá toàn bộ dòng màn hình chứa con trỏ, sau ựó dồn các dòng ở dưới lên.
* Procedure InsLine;
Xen một dòng trắng vào màn hình từ vị trắ con trỏ.
* Procedure LowVideo và NormVideo;
Sau khi gọi LowVideo mọi kắ tự viết ra màn hình ựều có ựộ sáng yếu ựi cho tới khi
gọi thủ tục NormVideo (Normal Video).
* Procedure Delay(Time);
Tạo ra thời gian trễ Time (khoảng ms). Time là một số nguyên. Delay thường ựược
dùng ựể làm chậm chương trình lại cho ta quan sát, khảo sát...
Tạo ra dao ựộng âm thanh với tần số là F (F: số nguyên) cho ựến khi ta gọi NoSound;
Bài tập chương 5
1. Viết chương trình tắnh tổ hợp chập m của n phần tử: Cmn Chương trình viết có chương trình con.
2. Viết chương trình tắnh Pn(x)=(. . . ( ( an*x+an-1 )*x+an-2 )*x+. . . +a1)*x+a0 Chương trình có chương trình con.
3. Cho dãy số sau: a1,a2,....,an . Viết chương trình tắnh tổng, trung bình cộng các phần tử của
dãy số ựó. Chương trình viết có chương trình con.
4. Lập chương trình tắnh diện tắch và chu vi của các hình: Tam giác biết 3 cạnh a,b,c, hình chữ nhật biết hai cạnh a,b, hình tròn biết bán kắnh. Chọn hình ựể tắnh thông qua câu hỏi ' Ban
tắnh cho hình gì TG=1, CN=2, TR =3 '. Chương trình viết có sử dụng chương trình con. 5. Cho hai số nguyên x1 và x2, lập chương trình nhập x1 và x2 từ bàn phắm, sử dụng
CHƯƠNG VI KIỂU DỮ LIỆU CÓ CẤU TRUC: KIỂU BẢN GHI VÀ KIỂU TỆP