Trường THCS Xuân Tân Lớp : 8/…… Họ và tên : ……………………………….Ms :…… Thứ .ngày….tháng….năm…… Kiểmtra 45’ Môn : Tin học 8 Đề 1 Điểm Lời phê Đề bài I /Trắc nghiệm (2đ): Điền Đ (đúng) hoặc S (sai) với các câu sau: 1. for i:=10 to 1 do writeln('b'); 2. var x: integer; begin for x := 1 to 10 do writeln('b'); end. 3. for i:=1 to 100 do ; 4. for i:=1 to 100 do writeln('b'); 5. for i:=0.5 to 5.5 do writeln('b'); 6. for i=1 to 100 do writeln('b'); 7. while…do là câu lệnh lặp với số lần lặp biết trước trong pascal 8. S:=0; n:=0; while S <= 100 do begin n:=n+1; S:=S+n end; II /Tự luận(8đ): Câu 1 (3điểm) Hãy sắp xếp lại đọan chương trình sau cho đúng var S, n : integer; S:=0; n:=1; while S<=100 do n:=n+1; S:=S+n; end; writeln('So n nho nhat de tong > 100 la ',n); readln end. Begin begin writeln('Tong dau tien > 100 la ',S); Câu 2 (2 điểm): Viết thuật toán tính tổng n số tự nhiên đầu tiên ( n = 1, 2, 3, . ) sao cho tổng nhỏ nhất lớn hơn 30 và in kết quả tổng, n Câu 3 (3 điểm) Viết chương trình in ra câu “ Tien hoc le – Hau hoc van “ 10 lần ? . . . . . . Trường THCS Xuân Tân Lớp : 8/…… Họ và tên : ………………………………….Ms :…… Thứ ngày…tháng… năm…… Kiểmtra 45’ Môn : Tin học 8 Đề 2 Điểm Lời phê Đề bài I /Trắc nghiệm (2đ): Điền Đ (đúng) hoặc S (sai) với các câu sau: 1. for i:= 1 to 20 do writeln('b'); 2. var y: integer; begin for y:=1 to 100 do writeln('b'); end. 3. for i:=20 to 1 ; 4. for i:=1 … 10 do writeln('b'); 5. for i:=1 to 50 do writeln('b'); 6. for i=1 to 10 do writeln('b'); 7. while…do là câu lệnh lặp với số lần lặp chưa biết trước trong pascal 8. S:=0; n:=0 while S <= 50 do begin n:=n+1; S:=S+n; end; II /Tự luận(8đ): Câu 1 (3điểm) Hãy sắp xếp lại đọan chương trình sau cho đúng S:=0; n:=1; while S<=50 do begin n:=n+1; S:=S+n; end; end. writeln('So n nho nhat de tong > 50 la ',n); readln begin var S, n : integer; writeln('Tong dau tien > 50 la ',S); Câu 1 (2 điểm): Viết thuật toán tính tổng n số tự nhiên đầu tiên ( n = 1, 2, 3, . ) sao cho tổng nhỏ nhất lớn hơn 20 và in kết quả tổng, n Câu 3 (3 điểm) Viết chương trình in ra câu “Di mot ngay dang – Hoc mot sang khon“ 10 lần ? . . . . . . Đáp án đề 1 I /Trắc nghiệm (2đ): Điền Đ (đúng) hoặc S (sai) với các câu sau: S 1. for i:=10 to 1 do writeln('b'); Đ 2. var x: integer; begin for x := 1 to 10 do writeln('b'); end. Đ 3. for i:=1 to 100 do ; Đ 4. for i:=1 to 100 do writeln('b'); S 5. for i:=0.5 to 5.5 do writeln('b'); S 6. for i=1 to 100 do writeln('b'); S 7. while…do là câu lệnh lặp với số lần lặp biết trước trong pascal S 8. S:=0; n:=0; while S <= 100 do begin n:=n+1; S:=S+n end; II /Tự luận(8đ): Câu 1 (3điểm) sắp xếp lại var S, n : integer; Begin S:=0; n:=1; while S<=100 do begin n:=n+1; S:=S+n; end; writeln('So n nho nhat de tong > 100 la ',n); writeln('Tong dau tien > 100 la ',S); readln end. Câu 2 (2 điểm): 4 bước, mỗi bước 0.5đ Câu 3 (3 điểm) Viết chương trình in ra câu “ Tien hoc le – Hau hoc van “ 10 lần ? Program lap; Var i : integer; Begin For i :=1 to 10 do Writeln ( ‘ lan thu ’,i,‘ Tien hoc le – Hau hoc van ‘); Readln End. Đáp án đề 2 I /Trắc nghiệm (2đ): Điền Đ (đúng) hoặc S (sai) với các câu sau: Đ 1. for i:= 1 to 20 do writeln('b'); Đ 2. var y: integer; begin for y:=1 to 100 do writeln('b'); end. S 3. for i:=20 to 1 ; S 4. for i:=1 … 10 do writeln('b'); Đ 5. for i:=1 to 50 do writeln('b'); S 6. for i=1 to 10 do writeln('b'); Đ 7. while…do là câu lệnh lặp với số lần lặp chưa biết trước trong pascal Đ 8. S:=0; n:=0 while S <= 50 do begin n:=n+1; S:=S+n; end; II /Tự luận(8đ): Câu 1 (3điểm) sắp xếp lại var S, n : integer; begin S:=0; n:=1; while S<=50 do begin n:=n+1; S:=S+n; end; writeln('So n nho nhat de tong > 50 la ',n); writeln('Tong dau tien > 50 la ',S); end. readln Câu 1 (2 điểm): Viết thuật toán tính tổng n số tự nhiên đầu tiên ( n = 1, 2, 3, . ) sao cho tổng nhỏ nhất lớn hơn 20 và in kết quả tổng, n 4 bước, mỗi bước 0.5đ Câu 3 (3 điểm) Viết chương trình in ra câu “ Di mot ngay dang – Hoc mot sang khon “ 10 lần ? Program lap; Var i : integer; Begin For i :=1 to 10 do Writeln ( ‘ lan thu ’,i,‘ Di mot ngay dang – Hoc mot sang khon ‘); Readln End. . 8/…… Họ và tên : ……………………………….Ms :…… Thứ .ngày….tháng….năm…… Kiểm tra 45’ Môn : Tin học 8 Đề 1 Điểm Lời phê Đề bài I /Trắc nghiệm (2đ): Điền Đ (đúng). 8/…… Họ và tên : ………………………………….Ms :…… Thứ ngày…tháng… năm…… Kiểm tra 45’ Môn : Tin học 8 Đề 2 Điểm Lời phê Đề bài I /Trắc nghiệm (2đ): Điền Đ (đúng)