Bài thực hành 2. Viết chương trình để tính toán

CHÀO MỪNG QUÝ THẦY CÔ VỀ DỰ GIỜ LỚP 8A
Kiểm tra bài cũ
Bạn Tuấn ghi lại tên kiểu dữ liệu trong Passcal, phạm vi giá trị của kiểu dữ liệu như trong bảng dưới đây nhưng chưa đúng. Hãy giúp Tuấn ghép lại kiểu dữ liệu đúng với giá trị phạm vi của nó
Em hãy cho biết một số kiểu dữ liệu thường được dùng nhất trong Passcal. Lấy ví dụ từng kiểu dữ liệu đó.
+ Số thực: ví dụ số học sinh của một lớp. Số sách trong thư viện…
+ Số nguyên: ví dụ chiều cao của bạn Bình, điểm trung bình môn…
+ Sau kí tự(hay sâu) là các “chữ cái” lấy từ bảng chữ cái của ngôn ngữ lập trình, ví dụ: chào các bạn”, lớp 8A…
uses crt;
begin
clrscr;
writeln(`16/3=`,16/3);delay(50000);
writeln(`16 div 3=`,16 div 3);delay(50000);
writeln(`16 mod 3=`,16 mod 3);delay(50000);
writeln(`,16 mod 3=`,16-(16 div 3)*3);delay(50000);
writeln(`,16 div 3=`,(16-(16 mod 3))/3);delay(50000);
readln
end.
b. Dịch và chạy chương trình. Quan sát kết quả nhận được và cho nhận xét các hết quả đó.
Tiết 8 BÀI THỰC HÀNH 2
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
c. Thêm các câu lệnh Delay(5000) và xau mỗi câu lệnh Writeln trong chương trình trên. Dịch và chạy chương trình. Quan sát chương trình tạm dừng 5 giây khi in từng kết quả ra màn hình.
d. Thêm câu lệnh readln vào chương trình (trước từ khóa end). Dịch và chạy chương trình. Quan sát kết quả hoạt động của chương trình. Nhấn phím Entet để tiếp tục.
Tiết 8 BÀI THỰC HÀNH 2
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
Bài 3: Tìm hiểu thêm về cách in dữ liệu ra màn hình
Mở tệp CT2.pass đã làm ở giờ trước
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));
writeln(`(10+2*(10+2)/(3+1) =`,(10+2)*(10+2)*(10+2)/(3+1));
writeln(`(10+2*(10+2)-24)/(3+1)=`,((10+2)*(10+2)-24/(3+1)));
readln
end.
Tiết 8 BÀI THỰC HÀNH 2
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
Mở tệp CT2.pass và sửa ba lệnh cuối (trước từ khóa end). thành
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)*(10+2)/(3+1)/(4/2));
writeln(`(10+2*(10+2)-24)/(3+1)=`,((10+2)*(10+2)-24/(3+1)/(4/2)));
readln
end.
Dịch và chạy chương trình. Quan sát kết quả trên màn hình và rút ra nhận xét của em.
Tiết 8 BÀI THỰC HÀNH 2
VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN
4. Củng cố
5. Hướng dẫn học sinh tự học ở nhà
- Học bài cũ, ai chưa song thực hành Bài thực hành 3 về nhà có điều kiện thực hiện tiếp, đọc trước bài Bài 4.