Đang tải... (xem toàn văn)
Hướng dẫn cài đặt và thực hành Dev Pascal
HƯỚNG DẪN THỰC HÀNH 1 PHẦN 1: HƯỚNG DẪN CÀI ĐẠT DEV-PASCAL Bước 1: nhấp đôi vào biểu tượng chương trình Dev-pascal Bước 2: Nhấp chọn I Agree chấp thuận các quy định của chương trình Bước 3: Chọn ổ đĩa cài đặt chương trình và nhấn nút Install. Bước 4: Nhấn nút Close hoàn tất quá trình cài đặt. Bước 5: Dev-pascal hoàn tất các thủ tục đặng kí trên máy tính. PHẦN 2: CÁC BƯỚC TẠO 1 CHƯƠNG TRÌNH PASCAL Bước 1: nhấn nút New source file Bước 2: Nhập đoạn mã chương trình Bước 3: Lưu chương trình và biên dịch chương trình Nhấn nút compile project để biên dịch chương trình Nhấn nút Excute để thực thi chương trình Cửa sổ khi chương trình thực thi PHẦN 3: BÀI TẬP THỰC HÀNH Bài 1: Viết chương trình xuất ra hình tam giác từ các dấu hoa thị. Kết quả hiển thị: ********* ******* ***** *** * a. Viết lại đoạn chương trình và đọc những lưu ý cần nhớ Chương trình Những lưu ý cần nhớ 1. Program Tam_giac; 2. Uses Crt; 3. Begin 4. Write('*********'); 5. Write (' *******'); 1. Khai báo chương trình bằng từ khóa Program 2. Khai báo sử dụng thư viện Crt bằng từ khóa Uses 3. Phần thân chương trình bắt đầu bằng từ 6. Write (' *****'); 7. Write (' ***'); 8. Write (' *'); 9. End. khóa Begin 4; 5;6; 7; 8 dùng lệnh write để xuất nội dung ra màn hình. Dữ liệu dạng chuỗi được đặt trong dấu nháy đơn ' ' Kết thúc dòng lệnh bằng dấu chấm phẩy ; 9. Kết thúc chương trình bằng từ khóa End b. Thay lệnh write bằng lệnh writeln và thêm dòng lệnh readln; trước dòng End. Hãy so sánh kết quả, rút ra ý nghĩa của hàm write; writeln và readln (trước từ khóa End) Bài 2: Viết chương trình nhập vào tên mình, máy tính sẽ hiện thị câu: “Xin chào bạn” + tên vừa nhập từ bàn phím Bài 3: Viết chương trình nhập số đo 2 cạnh của 1 hình chữ nhật xuất ra màn hình diện tích là chu vi hình chữ nhật đó Kết quả xuất ra màn hình Chương trình tham khảo CHUONG TRINH TINH DIEN TICH, CHU VI HINH CHU NHAT Cho biet chieu dai canh thu 1 = … Cho biet chieu dau canh thu 2 =… Dien tich hinh chu nhat = Chu vi hinh chu nhat = Program hinh_chu_nhat; Var a,b, p,S:Integer; Begin Writeln('CHUONG TRINH TINH DIEN TICH, CHU VI HINH CHU NHAT'); Write('-Cho biet chieu dai canh thu 1 = '); Readln(a); Write('-Cho biet chieu dau canh thu 2 = '); Readln(b); S := a * b; p := (a+b)*2; Writeln('+Dien tich hinh chu nhat = ',s:6:2); Writeln('+chu vi hinh chu nhat = ',p:6:2); Readln End. Bài 4. Viết chương trình nhập vào số đo 2 cạnh đáy và chiều cao của hình thang. Tính và xuất ra màn hình diện tích của hình thang đó Kết quả xuất ra màn hình Chương trình tham khảo CHUONG TRINH TINH DIEN TICH HINH THANG -Cho biet day ngan = -Cho biet day dai = -Cho biet chieu cao = Dien tich hinh thang = Program Hinh_thang; Var a,b,h:Integer; S:Real; Begin Writeln('CHUONG TRINH TINH DIEN TICH HINH THANG'); Write('-Cho biet day ngan = '); Readln(a); Write('-Cho biet day dai = '); Readln(b); Write('-Cho biet chieu cao = '); Readln(h); S := 0.5 * (a + b) * h; Writeln('+Dien tich hinh thang = ',s:6:2,' met vuong'); Readln End. Bài 5. Viết chương trình nhập vào số đo bán kính của vòng tròn. Tính và xuất ra màn hình diện tích và chu vi của hình hình tròn đó. Kết quả xuất ra màn hình Chương trình tham khảo TINH CHU VI, DIEN TICH HINH TRON Cho biet ban kinh : Chu vi vong tron = Dien tich vong tron = Program hinh_tron; Var Radius,s,cv :Real; const Pi=3.14; Begin Writeln('TINH CHU VI, DIEN TICH HINH TRON'); Writeln(' '); Write('-Cho biet ban kinh : '); Readln(Radius); cv:=2*Pi*Radius; S:=Pi*Radius*Radius; Writeln; Writeln('+Chu vi hinh tron = ',cv:10:2); Writeln('+Dien tich hinh tron = ',s:10:2); Writeln; Readln End. Bài 6. Program bai1; Var sogiay,gio,phut,giay:Integer; Begin Write('-Nhap so giay can tinh: '); Readln(sogiay); gio:=sogiay DIV 3600; sogiay:= sogiay MOD 3600; phut:=sogiay DIV 60; giay:=sogiay MOD 60; Writeln; Writeln('+Neu nhap vao: ',sogiay,' giay'); Writeln('+Doi thanh: ',gio,' gio, ',phut,' phut, ',giay,' giay'); Readln End. Yêu cầu: 1. Viết lại chương trình trên và thực thi chương trình với giá nhập vào là 15; 128; 256; 5688 2. Kết quả nhận được ở câu 1 có chổ nào chưa đúng ? Tại sao? Hãy chỉnh sữa chương trình để được kết quả đúng hơn ! BÀI TẬP TỰ LÀM Bài 1: Viết chương trình : - Cho trước các giá trị X, Y, Z. Viết đoạn chương trình hoán vị vòng quanh các giá trị trên : X nhận giá trị Y, Y nhận giá trị Z, Z nhận giá trị X. Bài 2: Viết chương trình : Nhập vào 2 số A và B. Thực hiện các phép toán cộng, trừ, nhân, chia với 2 số đó. . HƯỚNG DẪN THỰC HÀNH 1 PHẦN 1: HƯỚNG DẪN CÀI ĐẠT DEV- PASCAL Bước 1: nhấp đôi vào biểu tượng chương trình Dev- pascal Bước 2: Nhấp chọn I Agree chấp. của chương trình Bước 3: Chọn ổ đĩa cài đặt chương trình và nhấn nút Install. Bước 4: Nhấn nút Close hoàn tất quá trình cài đặt. Bước 5: Dev- pascal hoàn tất các thủ tục đặng kí trên. để biên dịch chương trình Nhấn nút Excute để thực thi chương trình Cửa sổ khi chương trình thực thi PHẦN 3: BÀI TẬP THỰC HÀNH Bài 1: Viết chương trình xuất ra hình tam giác