Cau lenh case... of....ppt

? H·y nªu có ph¸p cña c©u lÖnh IF ®iÒu
kiÖn d¹ng kiÖn d¹ng ®ñ.
Gsp45.exe
Thứ 6 ngày 21 tháng 12 năm 2007
I. Câu lệnh case of
1. Cú pháp


CASE <Biểu thức> OF
tập hằng1: lệnh 1;
tập hằng2: lệnh 2;
..
tập hằng n: lệnh n
ELSE
<lệnh n + 1>
END;
II. Câu lệnh case of ELSE
<Biểu thức> có thể mang
giá trị đúng hoặc sai. Nếu
đúng thì sau câu lệnh sau
OF sẽ thực hiện, còn sai
sẽ thực hiện câu lệnh sau
ELSE. Biểu thức phải là
kiểu số nguyên
I. Câu lệnh if then
1. Cú pháp
2. Ví dụ

Thứ 6 ngày 29 tháng 11 năm 2007
? Viết chương trình nhập một điểm kiểm tra từ bàn

phím và in kết quả xếp loại ra màn hình theo quy định.
Nếu sai thông báo lỗi lên màn hình Bạn đã nhập điểm
sai
Các điểm < 5 : Xếp loại yếu
Các điểm 5,6 : Xếp loại TB
Các điểm 7,8 : Xếp loại khá
Các điểm 9,10 : Xếp loại giỏi
Program nhapdiem;
var diem:Integer;
Begin
Write (‘nhap diem kiem tra’); Readln(diem);
Case diem of
0..4: Writeln(‘Xep loai Yeu’);
5,6: Writeln(‘Xep loai TB’);
7,8: Writeln(‘Xep loai Kha’);
9,10: Writeln(‘Xep loai Giái’)
ELSE
Writeln(‘Ban da nhap sai diem’);
END;
Readln
END.


Viết chương trình nhập số nguyên hơn
nhỏ hơn bằng10 và in ra kết quả bằng
chữ. Nếu sai thông báo lỗi lên màn hình
Bạn đã nhập sai
I. Câu lệnh if then
1. Cú pháp
2. Ví dụ

3. Bài tập

Gsp45.exe
Thứ 6 ngày 29 tháng 11 năm 2007
2 3
4 5 6
7
8
9
1