TRƯỜNG THCS ĐÀ LOAN
TIẾT 10 THỰC HÀNH SỐ 2
Kiểm tra bài cũ
1/ Nêu các hình thức giao tiếp giữa người và máy tính (6đ)
2/ Viết các biểu thức sau đây dưới dạng biểu thức trong Pascal (4đ)
BTH2:
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
1/ Mục đích yêu cầu:
-Luyện tập soạn thảo, chỉnh sửa chương trình, biên dịch, chạy và xem kết qủa hoạt động của chương trình trong môi trường Turbo Pascal.
-Thực hành với các biểu thức số học trong chương trình Pascal.
2/ Nội dung:
BT1: Luyện tập gõ các biểu thức số học trong Pascal
BTH2:
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
1/ Mục đích yêu cầu:
2/ Nội dung:
BT1: Luyện tập gõ các biểu thức số học trong Pascal
a) Viết các biểu thức toán học sau đây dưới dạng biểu thức trong Pascal.
 15*4-30+12
1/ 15x4-30+12
 (10+5)/(3+1)-18/(5+1)
 (10+2)*(10+2)/(3+1)
 ((10+2)*(10+2)-24)/(3+1)
Writeln(‘(10+5)/(3+1)-18/(5+1)=‘,(10+5)/(3+1)-18/(5+1));
Writeln(‘15*4-30+12=‘, 15*4-30+12);
Writeln(‘(10+2)*(10+2)/(3+1)=‘, (10+2)*(10+2)/(3+1));
Writeln(‘((10+2)*(10+2)-24)/(3+1)=‘, ((10+2)*(10+2)-24)/(3+1));
Begin
End.
b) Khởi động Turbo Pascal, gõ chương trình trên.
c) Lưu, dịch , chạy chương trình và kiểm tra kết quả.
Mở lại bài tập 1 và chỉnh sửa ba lệnh cuối (trước từ khóa end.) thành:
Dịch, chạy chương trình quan sát kết quả và cho nhận xét.
Begin
Writeln (‘15*4-30+12= ‘,15*4-30+12);
Writeln (‘(10+5)/(3+1)-18/(5+1)= ‘,(10+5)/(3+1)-18/(5+1):4:2);
Writeln (‘(10+2)*(10+2)/(3+1)= ‘,(10+2)*(10+2)/(3+1):4:2);
Write (‘((10+2)*(10+2)-24)/(3+1)= ‘,((10+2)*(10+2)-24)/(3+1):4:2);
End.
);
);
);
Củng cố:
Câu 1: Lệnh read và readln có tác dụng:
a) Dừng chương trình trong 5 giây
b) Dừng chương trình trong 10 giây
c) Dừng chương trình trong 2 giây
d) Dừng chương trình cho dến khi người dùng nhấn Enter
Củng cố:
Câu 2: Lệnh writeln(:n:m) dùng để:
a) Điều khiển cách in các số thực trên màn hình
b) Điều khiển cách in các số nguyên trên màn hình
c) Điều khiển cách in xâu kí tự trên màn hình
d) Cả a, b, c đều đúng