1.Hoạt động 1: Khởi động ( phỳt)
Ổn định tổ chức
2.Hoạt động 2: Kiểm tra (45 phỳt)
b) Đề kiểm tra :Đề 1: (8A) Đề 1: (8A)
I) Trắc nghiệm : Hóy khoanh trũn vào cõu đỳng ở cỏc cõu 1 ;2 ;4 ;5 ;6.Cõu 1 : Cõu lệnh Pascal sau cõu nào đỳng ? Cõu 1 : Cõu lệnh Pascal sau cõu nào đỳng ?
a) For i := 1 to 10; do x :=x+1; b ) For i := 10 to 1 do x :=x+1 ;
c) For i :=1 to 10 do x :=x+1 ; d) For i :=1 to 10 for j :=1 to 10 do x :=x+1 ;
Cõu 2 : Trong cõu lệnh lặp for i :=1 to 10 do begin s:= s+i; end ;
cõu lệnh lặp được thực hiện bao nhiờu lần?
a) Khụng lần nào. b) 1 lần c) 2 lần d) 10 lần
Cõu 3 : Sau khi thực hiện chương trỡnh sau biến j,k nhận giỏ trị bao nhiờu ?
Đoạn chương trỡnh sau :
j:=1 ;k:=2; Đỏp ỏn : j = For i:=1 to 5 do k = Begin j:=j+1; k:=k+j ; Writeln(j,k) ; End ;
Cõu 4 : Cõu lệnh viết đỳng cỳ phỏp trong ngụn ngữ lập trỡnh Pascal là:
a. While <điều kiện> to <cõu lệnh>;
b. While <điều kiện> do <cõu lệnh>;
c. While <điều kiện> to <cõu lệnh1> do <cõu lệnh 2>; d. While <điều kiện>; do <cõu lệnh>;
Cõu 5 : Hóy tỡm hiểu đoạn chương trỡnh sau và tỡm giỏ trị của T ? Var T,i: integer;
Begin
T:=0; i:=1;
While i<10 do begin i:=i+1; T:=T+1; Write (T); End.
a) 2018 b) 2020 c) 10 d) 9
Cõu 6 : Hóy tỡm hiểu đoạn chương trỡnh sau đõy : Sau khi đoạn chương trỡnh sau được thực hiện, cõu lệnh lặp được thực hiện bao nhiờu lần?
Var a: integer; Begin
A:=2020;
While a<2021 do writeln(‘Mon Tin hoc 8’); End.
a) 2018 b) 2020 c) 2021 d) Vụ hạn
II. Tự luận
Viết chương trỡnh sử dụng for .. do hoặc while …do để tớnh tổng. S = 1 + 2+3+…+2020
Với n được nhập từ bàn phớm.
Đề 2: (8B)
I) Trắc nghiệm : Hóy khoanh trũn vào cõu đỳng ở cỏc cõu 1 ;2 ;4 ;5 ;6.Cõu 1 : Cõu lệnh Pascal sau cõu nào đỳng ? Cõu 1 : Cõu lệnh Pascal sau cõu nào đỳng ?
a) For i := 1 to 10; do x :=x+1; b ) For i := 10 to 1 do x :=x+1 ;
c) For i :=1 to 10 do x :=x+1 ; d) For i :=1 to 10 for j :=1 to 10 do x :=x+1 ;
Cõu 2 : Trong cõu lệnh lặp for i :=1 to 2020 do begin s:= s+i; end ;
cõu lệnh ghộp được thực hiện bao nhiờu lần?
a) Khụng lần nào. b) 1 lần c) 2 lần d) 2020 lần
Cõu 3 : Sau khi thực hiện chương trỡnh sau biến j,k nhận giỏ trị bao nhiờu ?
Đoạn chương trỡnh sau :
j:=1 ;k:=2; Đỏp ỏn : j = For i:=1 to 5 do k = Begin j:=j+1 k:=k+j ; Writeln(j,k) ; End ;
Cõu 4 : Cõu lệnh viết đỳng cỳ phỏp trong ngụn ngữ lập trỡnh Pascal là:
a. While <điều kiện> to <cõu lệnh>;
b. While <điều kiện> do <cõu lệnh>;
c. While <điều kiện> to <cõu lệnh1> do <cõu lệnh 2>; d. While <điều kiện>; do <cõu lệnh>;
Cõu 5 : Hóy tỡm hiểu đoạn chương trỡnh sau và tỡm giỏ trị của i ? Var T,i: integer;
T:=0; i:=1;
While i<10 do begin i:=i+1; T:=T+1; Write (i); End.
a) 2018 b) 2020 c) 10 d) 9
Cõu 6 : Hóy tỡm hiểu đoạn chương trỡnh sau đõy : Sau khi đoạn chương trỡnh sau được thực hiện, cõu lệnh lặp được thực hiện bao nhiờu lần?
Var a: integer; Begin
A:=2020;
While a<2021 do writeln(‘Mon Tin hoc 8’); End.
a) 2018 b) 2020 c) 2021 d) Vụ hạn
II. Tự luận
Viết chương trỡnh sử dụng for .. do hoặc while …do để tớnh tổng. S = 1 + 2+3+…+2018
Với n được nhập từ bàn phớm.
Biểu chấm: Đề 1: