Tin Học 8 Bài Thực Hành 2: Viết Chương Trình để Tính Toán - Hoc247

YOMEDIA NONE Trang chủ Tin Học 8 Lập Trình Đơn Giản Tin học 8 Bài thực hành 2: Viết chương trình để tính toán ADMICRO Lý thuyết5 Trắc nghiệm 107 FAQ

Nội dung của Bài thực hành 2: Viết chương trình để tính toán dưới đây, các em sẽ làm bài tập thực hành về cách chuyển biểu thức toán học sang biểu diễn trong Pascal, sử dụng phép toán DIVMOD, tìm hiểu về các lệnh in dữ liệu ra màn hìnhtạm ngừng chương trình,... Mời các em cùng theo dõi nội dung chi tiết của bài thực hành.

ATNETWORK YOMEDIA

1. Tóm tắt lý thuyết

1.1. Mục đích, yêu cầu

1.2. Nội dung

2. Luyện tập Bài thực hành 2 Tin học 8

2.1. Trắc nghiệm

3. Hỏi đáp Bài thực hành 2 Tin học 8

Tóm tắt lý thuyết

1.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 quả 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.

1.2. Nội dung

Bài 1: Luyện gõ các biểu thức số học trong môi trường Pascal.

a) Viết các biểu thức sau dưới dạng biểu thức trong Pascal.

a. \(15 \times4 - 30+12 ;\)

b. \(\frac{15 + 5 }{3+1}-\frac{18}{5+1};\)

c. \(\frac{(10+2)^{2}}{(3+1)};\)

d. \(\frac{(10+2)^{2}-24}{(3+1)};\)

Lưu ý: chỉ sử dụng dấu ngoặc đơn để nhóm các phép toán.

b) Khởi động Pascal và gõ chương trình sau để tính các biểu thức trên.

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+6) = ' , (10+2)*(10+2)/(3+6));

End.

Lưu ý: Các biểu thức Pascal được đặt trong câu lệnh writeln để in ra kết quả. Em sẽ có cách viết khác sau khi làm quen với khái niệm biến ở bài 4.

c) Lưu chương trình với tên CT2.pas. Dịch, chạy chương trình và kiểm tra kết quả nhận được trên màn hình.

Gợi ý làm bài:

a) Viết các biểu thức trên dưới dạng biểu thức trong Pascal:

a. = 15*4 - 30 + 12 => Câu lệnh: Writeln('15*4-30+12= ', 15*4-30+12);

b. = (10+5)/(3+1)-18/(5+1) => Câu lệnh: Writeln('(10+5)/(3+1) - 18/(5+1)= ',(10+5)/(3+1) - 18/(5+1));

c. = (10+2)*(10+2)/(3+6) => Câu lệnh: Writeln('(10+2)*(10+2)/(3+1)= ', (10+2)*(10+2)/(3+1));

d. = ((10+2)*(10+2)-24)/(3+1) => Câu lệnh: Writeln('((10+2)*(10+2)-24)/(3+1)= ', ((10+2)*(10+2)-24)/(3+1));

b) Khởi động Pascal và gõ chương trình mẫu ở trên:

Để khởi động Pascal, các em thực hiện một trong hai cách sau:

  • Cách 1: Nháy đúp chuột vào biểu tượng Turbo Pascal trên màn hình nền.
  • Cách 2: Nháy đúp chuột vào tên tệp Turbo. Exe trong thư mục chứa tệp này (thường là thư mục con TP\BIN).

Trước khi gõ chương trình mẫu, các em thực hiện: Vào bảng chọn File, chọn New để mở cửa sổ mới và bắt đầu soạn thảo chương trình.

c) Lưu chương trình với tên CT2.pas, dịch, chạy chương trình và kiểm tra kết quả nhận được trên màn hình.

  • Lưu chương trình:
    • Cách 1: Nhấn F2.
    • Cách 2: Chọn File/ Save, hộp thoại hiện ra gõ tên cần lưu trong ô Name gõ tên CT2, chọn OK hoặc nhấn Enter.
  • Dịch chương trình: Nhấn tổ hợp phím Alt+F9.
  • Chạy chương trình: Nhấn tổ hợp phím Ctrl+F9.
  • Kiểm tra kết quả: Nhấn tổ hợp phím Alt+F5

Bài 2: Tìm hiểu các phép chia lấy phần nguyên, chia lấy phần dư với số nguyên. Sử dụng các câu lệnh tạm ngừng chương trình.

a) Mở tệp mới và gõ chương trình sau:

Uses crt;

Begin

clrscr;

writeln (’16/3 = ‘ , 16/3);

writeln (’16 div 3 = ‘ , 16 div 3);

writeln (’16 mod 3 = ‘ , 16 mod 3);

writeln (’16 mod 3 = ‘ , 16 - (16 div 3)*3);

writeln (’16 div 3 = ‘ , (16-(16 mod 3))/3);

End.

b) Dịch, chạy chương trình. Quan sát các kết quả nhận được và cho nhận xét về các kết quả đó.
c) Thêm các câu lệnh tạm dừng màn hình sau mỗi câu lệnh writeln để xem kết quả.
d) Thêm câu lệnh Readln vào trước từ khóa end, chạy và kiểm tra kết quả hoạt động của chương trình.

Gợi ý làm bài:

a) Mở tệp mới và gõ chương trình mẫu: Tương tự câu b Bài 1 ở trên.

b) Dịch, chạy chương trình và kiểm tra kết quả: Tương tự câu c Bài 1 ở trên.

Nhận xét kết quả:

writeln (’16/3 = ‘ , 16/3) => Kết quả = 5.333333333...

writeln (’16 div 3 = ‘ , 16 div 3) => Kết quả = 5;

writeln (’16 mod 3 = ‘ , 16 mod 3) => Kết quả = 1;

writeln (’16 mod 3 = ‘ , 16 - (16 div 3)*3) => Kết quả = 1;

writeln (’16 div 3 = ‘ , (16-(16 mod 3))/3) => Kết quả = 5.

DIV: phép chia lấy phần nguyên;

MOD: phép chia lấy phần dư.

c) Thêm các câu lệnh tạm dừng màn hình sau mỗi câu lệnh writeln

Uses Crt;

Begin

Clrscr;

Writeln (‘16/3=’,16/3); Delay(5000);

Writeln (’16 div 3 =’,16 div 3); Delay(5000);

Writeln (’16 mod 3 =’, 16 mod 3); Delay(5000);

Writeln (’16 mod 3 =’,16-(16 div 3)*3); Delay(5000);

Writeln (’16 div 3 =’,(16-(16 mod 3))/3); Delay(5000);

End.

Nhận xét: Lệnh Delay(5000): tạm ngừng chương trình trong 5000 phần nghìn giây, sau đó chạy tiếp.

d) Thêm câu lệnh Readln vào trước từ khóa end

Uses Crt;

Begin

Clrscr;

Writeln (‘16/3=’,16/3);

Writeln (’16 div 3 =’,16 div 3);

Writeln (’16 mod 3 =’, 16 mod 3);

Writeln (’16 mod 3 =’,16-(16 div 3)*3);

Writeln (’16 div 3 =’,(16-(16 mod 3))/3);

Readln

End.

Nhận xét: Lệnh Readln tạm ngừng chương trình cho tới khi nhấn phím Enter.

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.pas và sửa 3 dòng lệnh cuối (trước từ khóa end) như bên dưới. Sau đó dịch, chạy lại chương trình xem kết quả.

writeln ('15*4 – 30 + 12 = ' , 15*4-30+12 : 4 : 2);

writeln ('(10+5)/(3+1)-18/(5+1) = ' , (10+5)/(3+1)-18/(5+1) :4 : 2);

writeln ('(10+2)*(10+2)/(3+6) = ' , (10+2)*(10+2)/(3+6) : 4 : 2);

Gợi ý làm bài:

Để mở tệp CT2.pas, các em thực hiện: Vào bảng chọn File, chọn Open mở tệp chương trình đã lưu trong đĩa.

2. Luyện tập Bài thực hành 2 Tin học 8

Sau khi học xong Bài thực hành 2: Viết chương trình để tính toán, các em cần ghi nhớ các nội dung:

  • Các kí hiệu của các phép toán số học trong Pascal là: +, -, *, /, mod. Div.
  • Lệnh tạm dừng chương trình:
    • Delay(x): tạm ngừng chương trình trong x phần nghìn giây, sau đó chạy tiếp.
    • read hoặc readln tạm ngừng chương trình cho tới khi nhấn phím enter
  • Câu lệnh writeln(< giá trị thực ) : n : m) được dùng để điều khiển cách in số thực trên màn hình. Trong đó giá trị thực là số hay biểu thức số thực và m, n là các số tự nhiên. n quy định độ rộng in số, m là số chữ số thập phân. Lưu ý rằng các kết quả in ra màn hình được căn thẳng lề phải.

2.1. Trắc nghiệm

Các em có thể hệ thống lại nội dung kiến thức đã học được thông qua bài kiểm tra Trắc nghiệm Tin học 8 Bài thực hành 2 cực hay có đáp án và lời giải chi tiết.

  • Câu 1:

    Biểu thức toán học (a2 + b)(1 + c)3 được biểu diễn trong Pascal như thế nào?

    • A. (a*a + b)(1+c)(1 + c)(1 + c)
    • B. (a.a + b)(1 + c)(1 + c)(1 + c)
    • C. (a*a + b)*(1 + c)*(1 + c)*(1 + c)
    • D. (a2 + b)(1 + c)3
  • Câu 2:

    Các phép toán nào sau đây không dùng cho kiểu số thực?

    • A. +, -, *, /
    • B. <, >, >=, <=, < >, =
    • C. Mod và div
    • D. +, -, *, / và <, >, >=, <=, < >, =

Câu 3- 5: Mời các em đăng nhập xem tiếp nội dung và thi thử Online để củng cố kiến thức về bài học này nhé!

3. Hỏi đáp Bài thực hành 2 Tin học 8

Trong quá trình học tập nếu có thắc mắc hay cần trợ giúp gì thì các em hãy comment ở mục Hỏi đáp, Cộng đồng Tin học HOC247 sẽ hỗ trợ cho các em một cách nhanh chóng!

Chúc các em học tập tốt và luôn đạt thành tích cao trong học tập!

-- Mod Tin Học 8 HỌC247

NONE

Bài học cùng chương

Bài 1: Máy tính và chương trình máy tính Tin học 8 Bài 1: Máy tính và chương trình máy tính Bài 2: Làm quen với chương trình và ngôn ngữ lập trình Tin học 8 Bài 2: Làm quen với chương trình và ngôn ngữ lập trình Bài thực hành 1: Làm quen với Turbo Pascal Tin học 8 Bài thực hành 1: Làm quen với Turbo Pascal Bài 3: Chương trình máy tính và dữ liệu Tin học 8 Bài 3: Chương trình máy tính và dữ liệu Bài 4: Sử dụng biến trong chương trình Tin học 8 Bài 4: Sử dụng biến trong chương trình Bài thực hành 3: Khai báo và sử dụng biến Tin học 8 Bài thực hành 3: Khai báo và sử dụng biến ADSENSE ADMICRO Bộ đề thi nổi bật UREKA AANETWORK

XEM NHANH CHƯƠNG TRÌNH LỚP 8

Toán 8

Toán 8 Kết Nối Tri Thức

Toán 8 Chân Trời Sáng Tạo

Toán 8 Cánh Diều

Giải bài tập Toán 8 KNTT

Giải bài tập Toán 8 CTST

Giải bài tập Toán 8 Cánh Diều

Trắc nghiệm Toán 8

Ngữ văn 8

Ngữ Văn 8 Kết Nối Tri Thức

Ngữ Văn 8 Chân Trời Sáng Tạo

Ngữ Văn 8 Cánh Diều

Soạn Văn 8 Kết Nối Tri Thức

Soạn Văn 8 Chân Trời Sáng Tạo

Soạn Văn 8 Cánh Diều

Văn mẫu 8

Tiếng Anh 8

Tiếng Anh 8 Kết Nối Tri Thức

Tiếng Anh 8 Chân Trời Sáng Tạo

Tiếng Anh 8 Cánh Diều

Trắc nghiệm Tiếng Anh 8 KNTT

Trắc nghiệm Tiếng Anh 8 CTST

Trắc nghiệm Tiếng Anh 8 Cánh Diều

Tài liệu Tiếng Anh 8

Khoa học tự nhiên 8

Khoa học tự nhiên 8 KNTT

Khoa học tự nhiên 8 CTST

Khoa học tự nhiên 8 Cánh Diều

Giải bài tập KHTN 8 KNTT

Giải bài tập KHTN 8 CTST

Giải bài tập KHTN 8 Cánh Diều

Trắc nghiệm Khoa học tự nhiên 8

Lịch sử và Địa lý 8

Lịch sử & Địa lí 8 KNTT

Lịch sử & Địa lí 8 CTST

Lịch sử & Địa lí 8 Cánh Diều

Giải bài tập LS và ĐL 8 KNTT

Giải bài tập LS và ĐL 8 CTST

Giải bài tập LS và ĐL 8 Cánh Diều

Trắc nghiệm Lịch sử và Địa lí 8

GDCD 8

GDCD 8 Kết Nối Tri Thức

GDCD 8 Chân Trời Sáng Tạo

GDCD 8 Cánh Diều

Giải bài tập GDCD 8 KNTT

Giải bài tập GDCD 8 CTST

Giải bài tập GDCD 8 Cánh Diều

Trắc nghiệm GDCD 8

Công nghệ 8

Công Nghệ 8 KNTT

Công Nghệ 8 CTST

Công Nghệ 8 Cánh Diều

Trắc nghiệm Công Nghệ 8

Giải bài tập Công Nghệ 8 KNTT

Giải bài tập Công Nghệ 8 CTST

Giải bài tập Công Nghệ 8 CD

Tin học 8

Tin Học 8 Kết Nối Tri Thức

Tin Học 8 Chân Trời Sáng Tạo

Trắc nghiệm Tin học 8

Giải bài tập Tin học 8 CD

Tin Học 8 Cánh Diều

Cộng đồng

Hỏi đáp lớp 8

Tư liệu lớp 8

Xem nhiều nhất tuần

Đề thi HK1 lớp 8

Đề thi giữa HK1 lớp 8

Đề thi giữa HK2 lớp 8

Đề thi HK2 lớp 8

Đề cương HK1 lớp 8

9 bài văn mẫu Cô bé bán diêm hay nhất

Tiếng Anh Lớp 8 Unit 8

Tiếng Anh Lớp 8 Unit 7

Video Toán Nâng cao lớp 8- HK Hè

Video Toán Nâng cao lớp 8- HK2

Video Toán Nâng cao lớp 8- HK1

YOMEDIA YOMEDIA ×

Thông báo

Bạn vui lòng đăng nhập trước khi sử dụng chức năng này.

Bỏ qua Đăng nhập ×

Thông báo

Bạn vui lòng đăng nhập trước khi sử dụng chức năng này.

Đồng ý ATNETWORK ON zunia.vn QC Bỏ qua >>

Từ khóa » Cách Sử Dụng Lệnh Delay Trong Pascal