Hướng dẫn cài đặt và thực hành Dev Pascal

Hướng dẫn cài đặt và thực hành Dev Pascal

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ớ

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ừ

7 Write (' ***');

8 Write (' *');

9 End

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 = ');

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');

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ố đó