... Cú pháp 1: ( Hay gọi dạng thiếu) If < Điều kiện> Then ; + Trong đó: * Điều kiện: Là biểu thức quan hệ logic * Câu lệnh: Là câulệnh Pascal ý nghĩa câu lệnh: Chương trình kiểm tra giá ... kiện: Là biểu thức quan hệ logic * Câulệnh 1, câulệnh 2: Là câulệnh Pascal THCS Kim Ngoc Phm Vn Thng * Chú ý: Trước câulệnh ELSE dấu ; Ví dụ: If Delta < Then Write( PT vo nghiem ) Else Write( ... (đúng) câulệnh thực hiện, điều kiện sai không thực Ví dụ: If ( X mod =0) Then Write(x , la so chan ); THCS Kim Ngoc Phm Vn Thng b- Cú pháp 2: ( Hay gọi dạng đủ) IfThen < Câu lệnh1 >...
... II) Bài tập: Bài 2: Sau câulệnh sau đây: a) if (45 mod 3) = then X:=X+1; b) if X>10 then X:=X+1; Giá trị biến X bao nhiêu? Nếu trước giá trị X Giải:...
... ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp False Biểu thức logic True Lệnh Thứ ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp IFTHEN < lệnh> ... Real Em nêu cú pháp câulệnhifThenIFTHEN < lệnh> Trong câulệnh ta dùng dấu để ngăn cách câu lệnh: A Dấu (:) B Dấu (;) C Dấu (.) D Dấu (,) Em cho biết lệnh sau thông báo ... trị sai Nếu sau câulệnhTHEN thực hiện, sai bỏ qua < lệnh> là lệnh đơn hay lệnh kép đặt cặp từ khoá False Biểu thức logic True Lệnh Thứ ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp Ví...
... dụ 5: Câulệnh lặp lệnh thay cho Program TinhGiaiThua; Program lap; Program TinhTong; nhiều lệnh Var N, Integer; Integer; Var i: i:i: Integer; P: Longint; Var N, S: Longint; Ví dụ câulệnh lặp ... dấu chấm phẩy For i:=1 To 10 Do Writeln (lan lap thu,i); Câulệnh vòng lặp có nhiều lệnh đặt cặp từ khoá Begin End Tính tổng tích câulệnh lặp - Kiểu liệu số nguyên: Longint có phạm vi lơn so ... trị For i:=1 to 10 do(Nhap so ( lan lap thu(N); Writeln Writeln N =); Readln (N); P:= cuối Do câulệnh vòng lăp ; Readln; 1; S:= 0; - Trong đó: End For i:=1 to N P:= P*i; i; For i:=1 to N S:=...
... Điều kiện Câulệnh Sai Ví Nếu thực hiện, sai < câu lệnh> bị bỏ qua IF THEN ELSE ; b ... kiện Câulệnh Đúng Câulệnh Nếu < điều kiện> < câu lệnh1 > thực hiện, IF N mod 2=0 THEN Writeln( N so chan ) ngược lại < câulệnh 2> thực Ví dụ: ELSE Writeln( N la so le ); Hãy dùng câulệnhIFTHEN ... , X2:5:1); Câulệnh ghép Trong TP cho phép gộp nhiều câulệnh thành câulệnh gọi câulệnh ghép, có dạng: BEGIN BEGIN < Các câu lệnh> ; < Các câu lệnh> ; END; END; Ví dụ: IF Delta
... readln(b); Thay câulệnhif Write( nhap c= ); readln(c) ;then câulệnh rẽ dau la a} Max:=a; { gia su so lon nhat ban nhánh đầy đủ ifthen else có if b>max then max:=b; không? if c>max then max:=c; ... he so b= ); readln(b); If a0 then Else Writeln( PT co nghiem x=,-b/a:6:2) If b=0 then writeln( vo so nghiem) Else writeln( vo nghiem ); Readln; End 5 Chú ý - Câulệnh IfThenelse co thể lồng ... lệnh IfThenelse co thể lồng Có thể sử dụng liên tiếp câulệnhIfthen else -Trước else dấu chấm phẩy - Phân biệt sử dụng ifthen sử dụng ifthen else Bài tập nhà Bài tập 1: Viết chương trình...
... ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp False Biểu thức logic True Lệnh Thứ ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp IFTHEN < lệnh> ... Real Em nêu cú pháp câulệnhifThenIFTHEN < lệnh> Trong câulệnh ta dùng dấu để ngăn cách câu lệnh: A Dấu (:) B Dấu (;) C Dấu (.) D Dấu (,) Em cho biết lệnh sau thông báo ... trị sai Nếu sau câulệnhTHEN thực hiện, sai bỏ qua < lệnh> là lệnh đơn hay lệnh kép đặt cặp từ khoá False Biểu thức logic True Lệnh Thứ ngày 29 tháng 11 năm 2007 I Câulệnhifthen Cú pháp Ví...
... đơc); Câulệnh đk dạng đầy đủ Pascal có cấu trúc: IfThen else ; GV Chơng trình ktra đk, đk đợc thoả mãn, ctrình thực câu lệnh1 , ngợc lại ctrình thực câulệnh ... Pascal, câulệnh điều kiện dạng thiếu đợc viết với từ khoá có cấu trúc ntn? HS Trong Pascal, câulệnh đk dạng thiếu đợc viết với từ khoá ifthenCấu trúc: Ifthen GV ?Khi gặp câu ... khay đứng yên Bài 5: a, Sai sau if phải đk (phép so sánh), sau then phải câulệnh b, Sai thừa dấu ; sau lệnhif c, thừa câulệnh m:=n d, Sai thừa dấu ; sau lệnhThen Bài 6: a, X=6; b, X=5 GV Chốt...
... cố Câu 1: Trong câulệnh sau câulệnh cú pháp câulệnh lặp WHILE - DO Pascal? A WHILE DO < câu lệnh> ; B WHILE TO < câulệnh >; C WHILE = DO < câulệnh ... – Câulệnh While-do (tt) b Cú pháp: WHILE DO ; Trong đó: - Điều kiện biểu thức lôgic nhận - Câulệnhcâulệnh đơn ghép Điều kiện Sai Đúng Câulệnh Chừng điều kiện câulệnh ... < câulệnh > Trường THPT Cao Lãnh - Tổ: Toán_Tin - Giáo viên: Lê 14 Củng cố Câu 2: Cho câu lệnh: For i:=1 to n writeln(‘i*(i+1)div 2’); Hãy thay câulệnh đoạn chương trình dùng while-do? Dãy câu...
... CHƠI: ĐỘI MẠNH NHẤT 1.Thêm lệnh dừng 2s vào câu lệnh: REPEAT [FD 100 RT 90] Thêm lệnh dừng 1s vào câu lệnh: REPEAT [FD 100 RT 90 FD 50 RT 90] Thêm lệnh dừng 3s vào câu lệnh: REPEAT [FD 100 RT 72] ... Thứ sáu ngày 26 tháng 11 năm 2010 Môn: Tin học Tiết 16: Sử dụng câulệnh lặp (tiếp) Sử dụng câulệnh WAIT ? Muốn viết lệnh dừng giây sau thực lệnh thẳng 50 bước quay phải 60 độ em viết nào? ... viết nào? FD 50 RT 60 WAIT 120 Thứ sáu ngày 26 tháng 11 năm 2010 Tiết 16: Sử dụng câulệnh lặp (tiếp) Thêm lệnh dừng 2s vào câulệnh giải thích hành động Rùa REPEAT [FD 50 RT 60] REPEAT [FD 50...
... nhánh Câulệnh điều kiện Dạng 1: Trong đó: IFTHEN ; - Điều kiện: Là phép so sánh - Câu lệnh: Lệnh đơn lệnh ghép Điều kiện Đúng Câulệnh Sai Nếu thực ... PT vo nghiem IF delta bị bỏ qua Ví dụ 1: Nếu X>5 in giá trị X hình IF X>5 Then Writeln('Gia tri cua X=',X); Ví dụ 2: Giảm giá 30% cho khách hàng mua với số tiền T >=100000 IF T>=100000 Then...
... CHƠI: ĐỘI MẠNH NHẤT 1.Thêm lệnh dừng 2s vào câu lệnh: REPEAT [FD 100 RT 90] Thêm lệnh dừng 1s vào câu lệnh: REPEAT [FD 100 RT 90 FD 50 RT 90] Thêm lệnh dừng 3s vào câu lệnh: REPEAT [FD 100 RT 72] ... Thứ sáu ngày 26 tháng 11 năm 2010 Môn: Tin học Tiết 16: Sử dụng câulệnh lặp (tiếp) Sử dụng câulệnh WAIT ? Muốn viết lệnh dừng giây sau thực lệnh thẳng 50 bước quay phải 60 độ em viết nào? ... viết nào? FD 50 RT 60 WAIT 120 Thứ sáu ngày 26 tháng 11 năm 2010 Tiết 16: Sử dụng câulệnh lặp (tiếp) Thêm lệnh dừng 2s vào câulệnh giải thích hành động Rùa REPEAT [FD 50 RT 60] REPEAT [FD 50...
... 10 Câulệnh ghép Câulệnh ghép có dạng Begin …… End; Câulệnh ghép coi câulệnh 11/27/13 Slide 11 Lợi ích câulệnh lặp - Giảm nhẹ công sức viết chương trình 11/27/13 Slide 12 Tính tổng tích câu ... tính thực cấu trúc lặp với câulệnh Đó câulệnh lặp 11/27/13 Slide Ví dụ câulệnh lặp - Câulệnh lặp Pascal có dạng: For := to ; Trong đó: - for, ... dụng câulệnh lặp với số lần biết trước Slide 16 CÂU HỎI VÀ BÀI TẬP Khi thực câulệnh lặp, máy tính kiểm tra điều kiện Với lệnh lặp for := to ;...