Tin9Tiet24.Bai thuc hanh so 2

Gốc > THCS (Chương trình cũ) > Tin học > Tin học 9 >

0 / 0

Nhấn vào đây để tải về
Báo tài liệu có sai sót
Nhắn tin cho tác giả

(Tài liệu chưa được thẩm định)
Nguồn:
Người gửi: Hoàng Anh Tiến
Ngày gửi: 12h:21' 13-11-2008
Dung lượng: 627.0 KB
Số lượt tải: 84

Số lượt thích: 0 người

CHÀO MỪNG CÁC THẦY CÔ GIÁO VÀ CÁC EM HỌC SINH
Câu 1. Em hãy nêu cú pháp và hoạt động của câu lệnh tổ chức rẽ nhánh dạng thiếu trong Turbo Pascal?
Câu 2. Em hãy nêu cú pháp và hoạt động của câu lệnh tổ chức rẽ nhánh dạng đủ trong Turbo Pascal?
Cú pháp của câu lệnh rẽ nhánh dạng thiếu:
if < điều kiện> then ;
Hoạt động của câu lệnh rẽ nhánh dạng thiếu:
Khi gặp câu lệnh này, chương trình sẽ kiểm tra điều kiện. Nếu điều kiện đúng, chương trình sẽ thực hiện câu lệnh. Nếu điều kiện sai câu lệnh bị bỏ qua.
Cú pháp của câu lệnh rẽ nhánh dạng đủ:
if < điều kiện> then else ;
Hoạt động của câu lệnh rẽ nhánh dạng đủ:
Khi gặp câu lệnh này, chương trình sẽ kiểm tra điều kiện. Nếu điều kiện được thoả mãn, chương trình sẽ thực hiện câu lệnh 1 sau từ khoá Then. Trong trường hợp ngược lại, câu lệnh 2 sẽ được thực hiện.
Tiết 24
B�i th?c h�nh s? 2
TH?C H�NH V? S? D?NG C�C C�U L?NH R? NH�NH, L?NH L?P
Bài tập thực hành
Bài 1. Viết chương trình nhập hai số thực M và N. Hãy cho biết kết quả so sánh hai số đó dưới dạng "M lớn hơn N", "M nhỏ hơn N" hoặc "M bằng N" ?
a) Gõ chương trình sau:
b) Tìm hiểu ý nghĩa các câu lệnh trong chương trình. Dịch và sửa lỗi nếu có, chạy chương trình với các bộ dữ liệu (1.5, 1.6), (1.6, 1.4) và (1.6, 1.6) để thử chương trình. Cuối cùng lưu chương trình với tên So_sanh.
Program So_sanh;
Var M, N: Real;
BEGIN
Write(`Moi ban nhap so M: `); Readln(M);
Write(`Moi ban nhap so N: `); Readln(N);
IF M > N THEN Writeln(`M lon hon N`)
ELSE IF M < N THEN Writeln(`M nho hon N`)
ELSE Writeln(`M bang N`);
Readln
END.
Bài tập thực hành
Bài 2. Viết chương trình 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?
ý Tưởng: Ba số dương a, b và c là độ dài các cạnh của một tam giác khi và chỉ khi a + b > c, b + c > a và c + a > b.
Program Ba_canh_tam_giac;
Uses Crt;
Var a, b, c : Real;
BEGIN
Clrscr;
Write(`Moi ban 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 mot tam giac!`);
Readln
END.
Bài tập thực hành
Bài 3. Viết chương trình nhập điểm kiểm tra 1 tiết môn Tin học, sau đó thực hiện:
- Nếu điểm < 5, đưa ra dòng chữ "Ban can co gang hon"
- Nếu điểm lớn hơn hoặc bằng 5 và nhỏ hơn 6.5, đưa ra dòng chữ "Ban dat diem Trung binh".
- Nếu điểm lớn hơn hoặc bằng 6.5 và nhỏ hơn 8, đưa ra dòng chữ "Ban dat diem Kha".
- Nếu điểm lớn hơn hoặc bằng 8, đưa ra dòng chữ "Hoan ho ban dat diem Gioi".
Tổng Kết
1. Câu lệnh điều kiện dạng thiếu:
IF <Điều kiện> THEN ;
2. Câu lệnh điều kiện dạng đầy đủ:
IF <Điều kiện> THEN
ELSE ;
3. Có thể sử dụng câu lệnh IF..... THEN lồng nhau.
4. Sử dụng từ khoá and có thể 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 đú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
CHÚC CÁC EM
HỌC TỐT !!!