tiet 15 bai tap

Tiết 15 tin häc líp KIỂM TRA BÀI CŨ Bài 1: Chuyển biểu thức viết pascal (x*x +1)*(x*x +1)/b-a thành biểu thức toán: A. (x C. (x ) +1 B. b−a ) +1 a −b D. (x ) +1 b (x −a + 1) a −b KIỂM TRA BÀI CŨ Bài 2. : Bốn bạn A, B, C, D đưa kết phép chia, phép chia lấy phần nguyên lấy phần dư hai số nguyên 17 5. Hãy chọn bạn làm đúng: A. 17/5 =3; 17 div = 2; 17 mod = C. 17/5 = 3.4; 17 div = 3; 17 mod = B. 17/5 = 3; 17 div = 2; 17 mod = D. 17/5 = 4; 17 div = 3; 17 mod = KIỂM TRA BÀI CŨ Bài 3. Trong Pascal, khai báo sau (Đ)? khai báo sai (S)? A. var begin: real; Đ S B. var diem: integer; Đ S C. const a = 30; Đ S D. const a: real; Đ S I. Lí thuyết 1. Cú pháp khai báo biến lệnh gán Pascal  Var : ;  := ; 2. Cú pháp khai báo Pascal  Const = ; 3. Lệnh nhập giá trị cho biến Readln() Hay read() II. Bài tập Bài 1. Viết biểu thức tốn học sau dạng biểu thức Pascal. a. 15 × − (30 + 12) b. 10 + x x − 3+ x 5+ x c. (10 + 2) +1 (10 + a ) − 24 d. +1 Các biểu thức tốn học viết dạng biểu thức Pascal. a. 15*4 – (30 + 12) b. (10+x)/(3+x) – x/(5+x) c. (10+2)*(10+2)/3+1 d. ((10+a)*(10+a)-24)/(3+1) Bài 2. Dự đốn kết xuất hình chương trình sau. Program dudoan; Uses crt; Begin 15 + (8/2-3)*2 = 17.00 Clrscr; (7+5)*2 – 8/2 = 20.00= ’, 15 + (8/2Writeln(‘15 + (8/2-3)*2 15 mod = 3)*2:4:2); Writeln(‘(7+5)*2 – 8/2 = ’, (7+5)*2 – 8/2:4:2); Writeln(’15 mod = ’,15 mod 2); Writeln(15 div 2); Readln; End. Bài 3. Hãy liệt kê lỗi (nếu có) chương trình sửa lại cho đúng. Program DT_hinh vuong; Var a, S: Integer ; Begin clrscr; writeln(‘nhap dai canh hinh vuong:) realn(A); S:=a x a; writeln(‘dien tich hinh vuong:’ S); readln End. Bài 3. Program DT_hinh vuong; Var a, S: Integer ; Begin clrscr; writeln(‘nhap dai canh hinh vuong:) realn(A); S:=a x a; writeln(‘dien tich hinh vuong:’ S); readln End. Program DT_hinh_vuong; Uses crt; Var a, S: Integer ; Begin clrscr; writeln(‘nhap dai canh hinh vuong:’); readln(A); S:=a * a; writeln(‘dien tich hinh vuong :’,S); readln End. Bài 4. Viết chương trình nhập hai số ngun từ bàn phím hiển thị hình tổng tích hai số đó. Program Tinh_tong; Var a, b ,Tong, Tich : integer; Begin write (‘Nhap so thu nhat: ’); readln(a); write (‘Nhap so thu hai: ’); readln(b); Tong:= a+b; Tich:=a*b; writeln (‘Tong cua hai so bang:’, Tong); writeln (‘Tich cua hai so bang:’, Tich); End.  Dặn dò  Học lí thuyết SGK  Xem lại tập SGK  Chuẩn bị kiểm tra tiết PROGRAM DUONG_TRON; {1}trong chương trình. Bài 5. Giải thích dòng lệnh VAR Chuvi, Dientich, r : real; {2} CONST pi = 3.14; {3} BEGIN {4} Write ('Nhap ban kinh duong tron = '); readln (r); {5} Chuvi := 2*r*pi; {6} Dientich := r*r*pi; {7} Writeln ('Chu vi duong tron co ban kinh', r , 'la :', chuvi); {8} Writeln ('Dien tich duong tron ban kinh', r, ' la:', dientich); {9} Readln {10} END. {11} . Uses crt; Begin Clrscr; Writeln( 15 + (8/2-3)*2 = ’, 15 + (8/2- 3)*2:4:2); Writeln(‘(7+5)*2 – 8/2 = ’, (7+5)*2 – 8/2:4:2); Writeln( 15 mod 2 = ’ ,15 mod 2); Writeln (15 div 2); Readln; End. Bài 2 toán học sau đây dưới dạng biểu thức trong Pascal. 15 4 (30 12)× − + a. 10 3 5 x x x x + − + + b. 2 (10 2) 1 3 + + c. 2 (10 ) 24 3 1 a+ − + d. a. 15* 4 – (30 + 12) b. (10+x)/(3+x) – x/(5+x) c. (10+2)*(10+2)/3+1 d 2); Readln; End. Bài 2. Dự đoán kết quả xuất ra màn hình của chương trình sau. 15 + (8/2-3)*2 = 17.00 (7+5)*2 – 8/2 = 20.00 15 mod 2 = 1 7 Bài 3. Hãy liệt kê các lỗi (nếu có) trong chương trình