Bai thuc hanh 4 Su dung cau lenh dieu kien IfThen

Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu trong ngôn ngữ lập trình Pascal?.. Cú pháp dạng thiếu: IFTHEN;..[r]

Kiểm tra bài cũ

Cú pháp dạng thiếu:

IF <điều kiện> THEN <Câu lệnh>;

Câu 1 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu

trong ngôn ngữ lập trình Pascal?

Cú pháp dạng đầy đủ:

IF <điều kiện> THEN <Câu lệnh 1>

ELSE <Câu lệnh 2>;

Câu 2 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng đầy đủ trong ngôn ngữ lập trình Pascal?

Kiểm tra bài cũ.

Câu 1 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu

trong ngôn ngữ lập trình Pascal?

CÂU LỆNH ĐIỀU KIỆN

Cú pháp dạng thiếu:

IF <điều kiện> THEN <Câu lệnh>;

Cú pháp dạng đầy đủ:

IF <điều kiện> THEN <Câu lệnh1>

ELSE <Câu lệnh 2>;

Nếu điều kiện đúng thì chương trình

thực hiện câu lệnh , Ngược lại bỏ

qua.

Lưu ý: Trước ELSE không có dấu ;

Cấu trúc rẽ nhánh dạng thiếu: Cấu trúc rẽ nhánh dạng đầy đủ:

Bài toán: Viết chương trình nhập vào 2 số nguyên a, b Xuất số lớn

nhất ra màn hình.

Cú pháp dạng thiếu:

IF <điều kiện> THEN <Câulệnh>;

Cú pháp dạng đầy đủ:

IF <điều kiện> THEN <Câu lệnh 1>

ELSE <Câu lệnh 2>;

Bài Thực Hành 4: SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN

b Gõ chương trình sau đây:

Program lonnhat;

Var a, b, max : integer;

Begin Write(‘ Nhap so nguyen a =‘);

Readln(a);

Write(‘ Nhap so nguyen b = ‘); Readln(b);

max:=a;

Write(‘So lon nhat la ‘,max);

Readln;

End.

a Mô tả thuật toán để giải bài toán.

Input: Nhập a, b;

Out put: Giá trị lớn nhất

Bước 1: Nhập 2 giá trị a và b;

max:=a;

Bước 2: Kiểm tra nếu max <b thì

gán max:=b;

Bước 3: In giá trị max ra màn hình

Bước 4: Kết thúc.

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 gõ (nếu có) Nhấn Ctrl+F9 để chạy chương trình với các bộ dữ liệu (15, 13), (2009, - 2010) để thử chương trình Cuối cùng lưu chương trình với tên lon_nhat

Bài 1: Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn

phím và in hai 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 đây:

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 < b then writeln(a,’ ‘,b)

else writeln(b,’ ‘,a) ;

Readln;

End.

với tên Sap_xep

Bài thực hành 4: SỬ DỤNG LỆNH ĐIỀU KIỆN IF … THEN

Cú pháp dạng thiếu:

IF <điều kiện> THEN <Câu lệnh>;

Cú pháp dạng đầy đủ:

IF <điều kiện> THEN <Câu lệnh 1>

ELSE <Câu lệnh 2>;

Vậy qua bài toán này, ta đã sử dụng được dạng nào của

lệnh điều kiện

IF … THEN

Bài thực hành 4

Sử dụng câu lệnh điều kiện if…then

Bài 3: Nhập chương trình ba số dương a,b,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

Ba số dương a,b,c là độ dài của 3 cạnh khi nào?

Luyện Gõ Phím nhanh với Finger Break Out Bài Thực Hành 4:

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN