Đang tải... (xem toàn văn)
Cách thực hiện: Tính và kiểm tra điều kiện, nếu điều kiện đúng thì thực hiện câu lệnh, còn không thì câu lệnh bị bỏ qua... Tính và kiểm tra điều kiện, nếu điều kiện đúng thì thực hiện câ[r]
(1)BÀI TRƯỜNG THPT TAM GIANG (2) BÀI Đểyy tớ AØ, Neá neáuu ngaø mai möa ngaø mainghó möa thì thì tớ tớ nhà họởcnhà bàđã i,hoïneác ubaøkhoâ i ng thì tớ xem phim hoạt hình Tom, ngaøy mai caäu ñònh laøm gì ? (3) BÀI Neáu Thì… Neáu … thì… neáu khoâng thì… Caá Caáuu truù trúcc để để mô moâ taûtaû caùcaùcc meä mệnnhh đề đề nhö treâ treânn goï goïii laølaø caácaáuu truù truùcc reõreõ nhaù nhaùnnhh (4) BÀI Reõ nhaùnh Tình huoáng 1: Tom: “Nếu ngày mai mưa thì tớ nhà học baøi” Caâu noùi cuûa Tom cho bieát vieäc laøm cuï theå naøo? Và điều kiện đó là gì ? Câu nói Tom có đề cập đến việc gì xảy điều kiện đó không thỏa mãn không? Nhaän xeùt: - Daïng thieáu: Neáu … thì … (5) BÀI Reõ nhaùnh Tình huoáng 2: Tom: “Nếu ngày mai mưa thì tớ nhà học bài, không thì tớ xem phim hoạt hình” Caâu noùi cuûa Tom khaúng ñònh hai vieäc cuï theå gì ? Có nào hai việc cùng thực không? Vậy việc thực nào? Nhaän xeùt: - Dạng đủ: Nếu … thì … không thì … (6) BÀI Câu lệnh If – then a Cú pháp: Dạng thiếu Dạng đủ If <Điều kiện> then <câu If <Điều kiện> then <câu lệnh1> Else <câu lệnh2>; lệnh>; Trong đó: - Điều kiện là biểu thức quan hệ biểu thức logic - Câu lệnh, câu lệnh1, câu lệnh2 là câu lệnh Pascal - Trước else không có dấu ; (7) BÀI b Sơ đồ khối: Dạng thiếu Điều kiện Điều kiện T Dạng đủ Câu lệnh Câu lệnh F Điều kiện Điều kiện T Câu lệnh lệnh 11 Câu F Câu lệnh lệnh 22 Câu c Cách thực hiện: Tính và kiểm tra điều kiện, điều kiện đúng thì thực câu lệnh, còn không thì câu lệnh bị bỏ qua Tính và kiểm tra điều kiện, điều kiện đúng thì thực câu lệnh 1, sai thì thực câu lệnh (8) BÀI d Ví dụ: Vd1: Dạng thiếu: - Thông báo màn hình delta <0 thì phương trình vô nghiệm IF d<0 THEN writeln(‘phuong trinh vo nghiem’); Vd2: Dạng đủ: - Kiểm tra hai số nguyên a, b số nào max? IF a>b THEN max:=a ELSE max:=b; (9) BÀI d Ví dụ: - Vd3: Viết đoạn chương trình kiểm tra số nguyên dương m là số chẵn hay số lẽ In kết màn hình - NHÓM 1: Viết câu lệnh rẽ nhánh dạng thiếu - NHÓM 2: Viết câu lệnh rẽ nhánh dạng đủ (10) BÀI d Ví dụ: Chương trình (dạng đủ): Var m : word; Begin Write(‘nhap m: ’); Readln(m); If m mod = then Write(m,‘ la so chan’) Else Write(m,‘ la so le’); Readln; End Chương trình (Dạng thiếu): Var m : word; Begin Write(‘nhap m: ’); Readln(m); If m mod = then Write(m,‘ la so chan’); If m mod <> then Write(m,‘ la so le’); Readln; End (11) BÀI Hãy chạy chương trình đây với các liệu: * 1, -3, * 2, 2, Chương trình: Var a, b, c: integer; d, x1, x2: real; Begin Writeln(‘nhap gia tri cho a, b, c: ’); Readln(a, b, c); d:=b*b – 4*a*c; If d<0 then write(‘pt vo nghiem’) Else x1:=(-b+sqrt(d))/(2*a)); x2:=(-b-sqrt(d))/(2*a)); Writeln(‘x1 = ’,x1:4:1, ‘ x2 = ’,x2:4:1); Readln; End (12) BÀI Câu lệnh ghép: - Cú pháp: Begin <Các câu lệnh>; End; - Tác dụng: Gộp nhiều câu lệnh thành câu lệnh ghép (13) BÀI Moät soá ví duï Vieát chöông trình giaûi phöông trình baäc hai: ax bx c 0(a 0) (14) BÀI CỦNG CỐ Dưới đây là chương trình kiểm tra và in màn hình số lớn số a và b Chương trình có số lỗi, các lỗi đó Hãy sửa lại để chương trình đúng Var a, b:integer; Begin Write(‘nhap gia tri cho a va b:’); readln(a,b); If a <b then Write(a,‘ la so lon nhat); Else Write(b,‘ la so lon nhat); Readln; End (15) BÀI Viết chương trình tính và in màn hình Z biết: x y x y 1 Z x y x y (x, y nhập từ bàn phím) Hướng dẫn: Z=sqrt(x+y), in Z màn hình F x*x+y*y<=1 T Z=x*x+y*y, in Z màn hình (16) BÀI (17)