Networks Business Online Việt Nam & International VH2

Tin học 8 Bài thực hành 4: Sử dụng câu lệnh điều kiện If…Then – Học hỏi Net

Đăng ngày 09 September, 2022 bởi admin

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

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

– Hiểu được câu lệnh rẽ nhánh trong chương trình có sẵn .
– Viết được câu lệnh điều kiện kèm theo trong chương trình .
– Rèn luyện kỹ năng và kiến thức bắt đầu về đọc những chương trình đơn thuần và hiểu được ý nghĩa của thuật toán sử dụng trong chương trình .

1.2. Nội dung

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

– Câu lệnh điều kiện kèm theo dạng thiếu : IF THEN ;
– Câu lệnh điều kiện kèm theo dạng đủ :
IF THEN
ELSE ;

b. Thực hành

Hoạt động 1: Viết chương trình nhập 2 số nguyên a và b khác nhau từ bàn phím và in 2 số đó ra màn hình theo thứ tự không giảm.

a ) Mô tả thuật toán để giải bài toán đã cho
b ) Gõ chương trình sau :
program Sap_xep ;
uses crt ;
var A, B : integer ;
begin
clrscr ;
write ( ‘ Nhap so a = ‘ ) ; readln ( A ) ;
write ( ‘ Nhap so b = ‘ ) ; readln ( B ) ;
if A
else writeln ( B, ’ ‘, A ) ;
readln ;
end .

c) Tìm hiểu ý nghĩa của các câu lệnh trong chương trình

Nhấn Alt + F9 để dịch và sửa lỗi. nhấn Ctrl + F9 để chạy. nhập những bộ tài liệu ( 12,53 ), ( 65,20 ). Lưu chương trình với tên Sap_xep. pas

Hướng dẫn giải

a. Mô tả thuật toán

– Bước 1 : nhập số A
– Bước 2 : nhập số B
– Bước 3 : so sánh, nếu A

c. Kết quả

Hoạt động 2: Viết chương trình nhập chiều cao của hai bạn Long và Trang, in ra màn hình kết quả so sánh chiều cao của hai bạn, dưới dạng ″Bạn Long cao hơn″, ″Bạn Trang cao hơn″, ″Hai bạn bằng nhau″.

a ) Gõ chương trình sau :
program Ai_cao_hon ;
uses crt ;
var Long, Trang : Real ;
begin
clrscr ;
write ( ‘ Nhap chieu cao cua Long : ’ ) ; readln ( Long ) ;
write ( ‘ Nhap chieu cao cua Trang : ’ ) ; readln ( Trang ) ;
If Long > Trang then writeln ( ‘ Ban Long cao hon ’ ) ;
If Long
else writeln ( ‘ Hai ban cao bang nhau ’ ) ;
readln ;
end .
b ) Lưu chương trình với tên Aicaohon. pas. dịch và sửa lỗi nếu có .
c ) Chạy chương trình với những bộ tài liệu ( 1.5, 1.6 ) và ( 1.6, 1.5 ) và ( 1.6, 1.6 ). quan sát hiệu quả nhận được và cho nhận xét, tìm chỗ sai .
d ) Sửa lại chương trình cho hiệu quả đúng : chỉ in ra màn hình hiển thị 1 thông tin tác dụng .
Tham khảo và tìm hiểu và khám phá y nghĩa đoạn chương trình sau đây :
If Long > Trang then writeln ( ‘ Ban Long cao hon ’ ) else If Long

Hướng dẫn giải

c. Kết quả

– Nhận xét : ở bộ tài liệu thứ 2, chương trình in ra thừa 1 thông tin do cả 2 câu điều kiện kèm theo đều được thỏa mãn nhu cầu .

d. Sửa lại

program Ai_cao_hon ;
uses crt ;
var Long, Trang : Real ;
begin
clrscr ;

        write(‘Nhap chieu cao cua Long:’); readln(Long);

write ( ‘ Nhap chieu cao cua Trang : ’ ) ; readln ( Trang ) ;
If Long > Trang then writeln ( ‘ Ban Long cao hon ’ ) ; else
If Long
else writeln ( ‘ Hai ban cao bang nhau ’ ) ;
readln ;
end .

Hoạt động 3: Nhập ba số dương a, b, và c từ bàn phím, kiểm tra và in ra màn hình kết quả kiểm tra ba số đó có thể là độ dài các cạnh của một tam giác hay không.

Hướng dẫn giải

Ba số dương a, b, và c là độ dài những cạnh của một tam giác khi và chỉ khi a + b > c, b + c > a và c + a > b

Tam giác có độ dài a, b, và c

– Xác định bài toán: 

+ Input : Nhập ba số dương a, b, và c từ bàn phím
+ Output :
a, b, và c là độ dài những cạnh của một tam giác
a, b, và c không là độ dài những cạnh của một tam giác

– Mô tả thuật toán:

Sơ đồ khối mô tả thuật toán kiểm tra ba số a, b và c có phải là các cạnh của một tam giác hay không?

Chương trình :
Program Ba_canh_tam_giac ;
uses crt ;
Var a, b, c : real ;
Begin
Clrscr ;
write ( ‘ Nhap ba so a, b va c : ’ ) ; readln ( a, b, c ) ;
If ( a + b > c ) and ( b + c > a ) and ( c + a > b ) then
writeln ( ‘ a, b va c la 3 canh cua mot tam giac ! ’ )
else writeln ( ‘ a, b, c khong la 3 canh cua 1 tam giac ! ’ ) ;
end .

2. Luyện tập

Câu 1: If … Then … Else là loại nào?

A. Vòng lặp xác lập
B. Câu lệnh điều kiện kèm theo
C. Vòng lặp không xác lập
D. Một khai báo

Câu 2: Chương trình sau cho kết quả là gì?

Program vd ;
Var a, b, : real ; x, : integer ;
Begin readln ( a, b ) ;
If a > b then x : = a else x : = b ;
Write ( x ) ;
End .
A. Đảo giá trị của 2 biến a, b cho nhau
B. Xuất ra màn hình hiển thị số nhỏ nhất trong 2 số a, b đã nhập
C. Chương trình không triển khai được do lỗi khai báo kiểu tài liệu
D. Xuất ra màn hình hiển thị số lớn nhất trong 2 số a, b đã nhập

Câu 3: IF a>8 THEN b:=3 ELSE b:=5; Khi a nhận giá trị là 0 thì b nhận giá trị nào?

A. 0
B. 8
C. 3
D. 5

Câu 4: Các câu lệnh Pascal sau đây được viết đúng?

A. if x : = 5 then a = b ;
B. if x > 4 then a : = b ; m : = n ;
C. if x > 4 ; then a : = b ;
D. if x > 4 then a : = b ; else m : = n ;

Câu 5: Chọn câu lệnh Pascal hợp lệ trong các câu sau:

A. If a > b then max : = a ; else max : = b ;

B. If 5 = 6 then x : = 100;

C. If a > b then max = a ;
D. If x : = a + b then x : = x + 1 ;

3. Kết luận

Sau khi học xong bài thực hành số 4 những em cần nắm được một số ít nội dung cơ bản sau đây :

  • Câu lệnh điều kiện dạng thiếu: If then ;
  • Câu lệnh điều kiện dạng đủ: If then else ;
  • Từ khóa AND(và) để kết hợp nhiều phép so sánh đơn giản thành một phép so sánh phức hợp. Giá trị của phép so sánh này là đúng khi và chỉ khi tất cả các phép so sánh đơn giản đều đúng. Ngược lại, nó có giá trị sai.
  • Từ khóa OR(hoặc) để kết hợp nhiều phép so sánh đơn giản. Giá trị của phép so sánh này chỉ sai khi và chỉ khi tất cả các phép so sánh thành phần đều sai. Ngược lại, nó có giá trị đúng.

Source: https://vh2.com.vn
Category : Tin Học