bài 19 tin 11

Mời bạn theo dõi chương trình sau Program Tinh_tong; Uses crt; Var a,b:integer; tong:integer; Begin Clrscr; Write(‘Nhap vao so a,b:’); Readln(a,b); Tomg:=a+b; Write(‘tong can tinh:’,s:4); Readln End 1 Thư viện Crt Clrscr TextColor(color) TextBackground (color) GotoXY (x,y) Khi sử dụng thủ tục đầu chương trình cần khai báo Uses Crt; Chúng ta theo dõi chương trình a Clrscr Program VD_1; Program VD_1; Uses crt; Begin Begin Clrscr; Clrscr; Writeln(‘Xoa man hình’); Writeln(‘Xoa man hình’); Readln Readln End End a Clrscr Thủ tục Clrscr: Xóa tồn hình đưa trỏ vị trí (1,1) hình Màn hình chia thành 25 dòng 80 cột Cột đánh số 1, dòng đánh số Chạy CT b Thủ tục TextColor(color) Thủ tục TextColor(color): Đặt màu cho chữ hình Trong đó: Color hay biến xác định màu Color có giá trị từ đến 15 b Thủ tục TextColor(color) Các xác định chữ dùng cho biến Color Màu Đen Xanh trời Xanh xanh lơ Đỏ Tím Vàng Trắng Tên black blue green cyan red magenta yellow white Giá trị 14 15 b Thủ tục TextColor(color) Ta dùng chữ dùng số Ví dụ: TextColor(15) TextColor(White) Đều chọn chữ màu trắng Thủ tục TextBackColor(color) Thủ tục TextBackColor(color): Đặt màu cho chữ hình Trong đó: Color hay biến xác định màu Color có giá trị từ đến 15 d Thủ tục GotoXY (x,y) Thủ tục GotoXY(x,y): đưa trỏ tới dòng x, cột y hình văn Ví dụ: Uses CRT; Begin Writeln(‘Con tro o dong 15 cot 30’); Gotoxy(15,30); Readln; End 2 Thư viện Graph Thư viện Graph chứa hàm, thủ tục liên quan đến chế dộ đồ họa loại hình khác cho phép thực thao tác đồ họa vẽ điểm, đường, tô màu… Thư viện Graph a Các thiết bị chương trình hỗ trợ đồ họa Màn hình có chế độ làm việc:  Chế độ văn  Chế độ đồ họa Chế độ đồ họa chế độ hình cho phép viết kí tự với ma trận chữ biểu diễn kí tự cố định Việc viết chữ lên hình mạch điện tử điều khiển (thường trùng với loại hình) a.Các thiết bị chương trình hỗ trợ đồ họa Trong chế độ đồ họa hình chia thành lưới vng điểm Mỗi điểm gọi phần tử ảnh (Pixel: Picture Element) Ví dụ: hình VGA: có 480 dịng điểm, dịng có 640 điểm Để làm việc với chế độ đồ họa đầu chương trình phải khai báo Uses Graph a.Các thiết bị chương trình hỗ trợ đồ họa Màn hình máy tính có nhiều loại: màu Đơn sắc, Độ phân giải khác Do với loại hình cần có chương trình điều khiển việc giao tiếp với hình Các chương trình điều khiển nằm tệp có phần m rộng BGI ( Borland Graphics Interface) Muốn hoạt động đồ họa ta phải có tệp BGI, thiếu tệp BGI chế độ đồ họa không hoạt động b Khởi tạo chế độ đồ họa Một chương trình đồ họa bắt đầu việc khởi tạo chế độ đồ họa Thủ tục khởi tạo chế độ đồ họa Procedure InitGraph (var driver,mode:integer,path:string); Trong đó: Driver: Là số hiệu trình điều khiển BGI Mode: Là số hiệu độ phân giải Path: Là đường dẫn đến tệp BGI b Khởi tạo chế độ đồ họa Ví dụ: Giả sử hình làm việc VGA Driver:=0; InitGraph(driver,mode:integer,’c:\TP\BGI’); Kết thúc làm việc với chế độ đồ họa, đưa hình chế độ văn Thủ tục: CloseGraph; ... dõi chương trình sau Program Tinh_tong; Uses crt; Var a,b:integer; tong:integer; Begin Clrscr; Write(‘Nhap vao so a,b:’); Readln(a,b); Tomg:=a+b; Write(‘tong can tinh:’,s:4); Readln End 1 Thư