Tin Học 8 Bài Thực Hành 5: Sử Dụng Lệnh Lặp For…Do

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 5: Sử dụng lệnh lặp For…Do ADMICRO Lý thuyết5 Trắc nghiệm 98 FAQ

Nội dung của Bài thực hành 5: Sử dụng lệnh lặp For…Do dưới đây các em sẽ được thực hành về cách viết chương trình Pascal có câu lệnh lặp For..do, thực hành về sử dụng được câu lệnh ghép và rèn luyện kĩ năng đọc hiểu chương trình có sử dụng vòng lặp for...do. 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 5 Tin học 8

2.1. Trắc nghiệm

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

Tóm tắt lý thuyết

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

• Viết được chương trình có sử dụng vòng lặp for...do;
• Sử dụng được câu lệnh ghép;
• Rèn luyện kĩ năng đọc hiểu chương trình có sử dụng vòng lặp for...do.

1.2. Nội dung

a. Ôn tập kiến thức

Cú pháp:

For < biến đếm >:= < giá trị đầu > to < giá trị cuối > do

< câu lệnh >;

Trong đó:

• FOR, TO, DO: là từ khóa.
• Biến đếm: thuộc kiểu dữ liệu số nguyên.
• Giá trị đầu, giá trị cuối: là giá trị nguyên.
• Câu lệnh: có thể là câu lệnh đơn hay câu lệnh ghép.

Ý nghĩa:

Khi thực hiện, biến đếm sẽ nhận giá trị là giá trị đầu, sau mỗi vòng lặp, biến đếm sẽ tự động tăng thêm một đơn vị cho đến khi bằng giá trị cuối thì dừng lại.

b. Thực hành

Bài 1. Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, số được nhập từ bàn phím và dừng màn hình để có thể quan sát kết quả.

a. Khởi động Pascal. Gõ chương trình sau và tìm hiểu ý nghĩa của từng câu lệnh trong chương trình;

uses crt;

var N,i:integer;

begin

clrscr;

write('Nhap so N=');

readln(N);

writeln;

writeln('Bang nhan ',N);

writeln;

for i:=1 to 10 do

writeln(N,' x ', i:2,' = ',N*i:3);

readln;

end.

b. Lưu chương trình với tên BANGNHAN.PAS;

c. Dịch và chỉnh sửa các lỗi gõ, nếu có;

d. Chạy chương trình với các giá trị nhập vào lần lượt bằng 1, 2, …,10. Quan sát kết quả nhận được trên màn hình.

Gợi ý làm bài:

Kết quả in ra màn hình:

Hình 1. Kết quả in ra màn hình bảng nhân 6

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

• Các hàng kết quả sát nhau khó đọc;
• Các hàng kết quả không được cân đối với hàng tiêu đề.

Bài 2. Chỉnh sửa chương trình để làm đẹp kết quả trên màn hình như hình dưới đây:

Hình 2. Kết quả in ra màn hình bảng nhân 7

Gợi ý làm bài:

Chương trình:

uses crt;

var N,i:integer;

begin

clrscr;

write('Nhap so N='); readln(N);

writeln;

writeln('Bang nhan ',N);

writeln;

for i:=1 to 10 do

begin

GotoXY(5,WhereY);

writeln(N,' x ',i:2,' = ',N*i:3);

writeln;

end;

readln

end.

Các câu lệnh được thêm vào:

• Writeln; => Tạo một hàng trống tại vị trí con trỏ.
• GotoXY(a,b); => Đưa con trỏ về cột a hàng b.
• Lệnh GotoXY(5, whereY); => Đưa con trỏ về vị trí cột 5 của hàng hiện tại.
• WhereY => Cho biết thứ tự của hàng đang có con trỏ.

Lưu ý: Chỉ sử dụng được các lệnh GotoXY(a,b), WhereX, WhereY sau khi đã khai báo thư viện crt; của Pascal.

Bài 3. Cũng như câu lệnh if, có thể dùng câu lệnh for lồng trong một câu lệnh for khác khi thực hiện lặp. Sử dụng các câu lệnh for…do lồng nhau để in ra màn hình các số từ 0 đến 99 theo dạng bảng như hình sau:

Hình 3. Kết quả in ra màn hình các số từ 0 đến 99

Gợi ý làm bài:

Chương trình:

Program Tao_bang;

Uses Crt;

Var

i: byte; {chi so cua hang}

j: byte; {chi so cua cot}

Begin

Clrscr; {xoa man hinh}

For i:=0 to 9 do {viet theo tung hang}

begin

For j:=0 to 9 do {viet theo tung cot tren moi hang}

write(10*i+j:4); {viet cac so ij ra man hinh}

writeln; {xuong hang moi}

end; {xong hang thu i}

readln; {dung chuong trinh de xem ket qua}

end.

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

Sau khi học xong Bài thực hành 5: Sử dụng lệnh lặp For…Do, các em cần ghi nhớ:

1. Cấu trúc lặp với số lần được biết trước thể hiện bằng lệnh For …do

2. Câu lệnh GotoXY(a,b) có tác dụng đưa con trỏ về cột a, hàng b.

3. Hàm WhereX cho biết số thứ tự của cột đang có con trỏ.

4. Hàm WhereY cho biết số thứ tự của hàng đang có con trỏ.

5. Chỉ sử dụng các lệnh GotoXY, WhereX, WhereY sau khi khai báo thư viện crt của Pascal.

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 5 cực hay có đáp án và lời giải chi tiết.

• Câu 1:

  Lệnh lặp For, mỗi lần lặp giá trị của biến đếm thay đổi như thế nào?

  • A. Tăng 1
  • B. Tăng 2
  • C. Tăng 3
  • D. Tăng 4

• Câu 2:

  Lệnh lặp nào sau đây là đúng?

  • A. For < biến đếm > = < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
  • B. For < biến đếm > := < giá trị đầu > to < giá trị cuối> do <câu lệnh>;
  • C. For < biến đếm > := < giá trị cuối > to < giá trị đầu > do < câu lệnh >;
  • D. For < biến đếm > : < giá trị đầu > to < câu lệnh > do < giá trị cuối >;

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 5 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

Tin học 8 Bài 1: Máy tính và chương trình máy tí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 Tin học 8 Bài thực hành 1: Làm quen với Turbo Pascal Tin học 8 Bài 3: Chương trình máy tính và dữ liệu Tin học 8 Bài thực hành 2: Viết chương trình để tính toán Tin học 8 Bài 4: Sử dụng biến trong chương trình 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 giữa HK2 lớp 8

Đề thi giữa HK1 lớp 8

Đề thi HK2 lớp 8

Đề thi HK1 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 7

Tiếng Anh Lớp 8 Unit 8

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

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

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

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 QC Bỏ qua >>