Hoạt động của giáo viên và học sinh | Nội dung |
Hoạt động 1 : bài tập 1 (13’) | |
Câu 1: Viết cú pháp câu lệnh điều kiện dạng thiếu và dạng đủ. Vẽ sơ đồ khối tương ứng. |
Câu 1: Lệnh If …. Then …..Else Dạng 1: dạng thiếu If < Điều kiện > then Lệnh; Dạng 2: dạng đủ If < Điều kiện > then Lệnh 1 Else Lệnh 2 ; Trước else không có dấu chấm phẩy. Trong điều kiện là một biểu thức logic . Cách thi hành lệnh này như sau: Vẽ sơ đồ khối : Dạng thiếu Dạng đủ : |
Hoạt động 2 : Câu 2 () | |
Câu 2 : Chuyển các biểu thức toán học sau sang biểu thức trong pascal. (16 phút) a) b) 2. Viết chương trình tính giá trị các biểu thức trên |
Câu 2 : 1. Chuyển sang pascal :
Program tinh gia tri bieu thuc; uses crt; var a:integer; T,V:real; begin writeln(‘nhap a’); readln(a); T:= (a+1)*(a+1) – 7a/2; V:= (a+4)/7 + 4*4; writeln(‘gia tri bieu thuc 1 la:’,T); writeln(‘gia tri bieu thuc 2 la:’,V); readln; end. |
Hoạt động 3 : câu 3 (12’) | |
Câu 3: Mô tả thuật toán và viết chương trình nhập 3 số dương a, b, c từ bàn phím, kiểm tra và in ra màn hình số lớn nhất trong 3 số vừa nhập. |
Câu 3: - Xác định bài toán: + Input: ba số dương a,b,c nhập từ bàn phím + Output: Số lớn nhất trong 3 số. - Mô tả thuật toán: B1: max:=a; i:=1; B2: i:=i+1; B3: Nếu i>n, chuyển đến bước 5: B4: Nếu ai>max, max:=ai; quay lại bước 2: B5: Kết thúc thuật toán. - Viết chương trình: program so lon nhat; uses crt; var max,a,b,c: integer; begin writeln(‘nhap a,b,c’); readln(a,b,c); max:=a; if max<b then max:=b; if max<c then max:=c; writeln(‘so lon nhat trong 3 so la:’,max); readln; end |
Hoạt động 4 : củng cố () | |
-GV hệ thống lại kiến thức toàn bài - nhắc lại những từ khóa cần chú trọng . - giải thích ý nghĩa các từ khóa |
Ý kiến bạn đọc
Những tin cũ hơn