Đề thi HK2 năm 2020 môn Tin học 8 có đáp án Trường THCS Lương Thế Vinh

TRƯỜNG THCS LƯƠNG THẾ VINH

ĐỀ THI HỌC KÌ 2

MÔN TIN HỌC 8

NĂM HỌC 2019 - 2020

 

A. Phần trắc nghiệm:

Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng?

A. for i:= 4 to 1 do writeln(‘A’);                                  

B. for i= 1 to 10  writeln(‘A’);                      

C. for     i:= 1 to 10 do writeln(‘A’);                                           

D. for i  to 10 do writeln(‘A’);      

Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );

Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?

A. 10 lần                             

B. 5 lần                

C. 1 lần             

D. Không thực hiện.

Câu 3. Cho đoạn chương trình: J:= 0;

                                                            For i:= 1 to 5 do J:= j + i;

Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?

A. 12                   

B. 22                                                     

C. 15                     

D. 42.

Câu 4. Trong Pascal, câu lệnh nào sau đây là đúng?

A. S:=1;                                                                                              

While S<10 do write(S);      

B. i:=0; S:=1;

while s<10 do S:=S+i; i:=i+1; 

C. n:=2; while n<5 do write(‘A’);                                               

D. Cả A và B.

Câu 5. Khi thực hiện đoạn chương trình sau:  n:=1; T:=50;

        While n>20 do begin n:=n+5; T:=T - n end;

Hãy cho biết giá trị của biến T  bằng bao nhiêu?

A. 14                                    

B. 15                                                     

C. 16                                     

D. 17    

Câu 6. Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]);  để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A. 4                                       

B. 5                                                       

C. 6                                       

D. 7

Câu 7. Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A. Chỉ số đầu và chỉ số cuối là 2 số nguyên.                          

B. Chỉ số đầu  chỉ số cuối.

C. Kiểu dữ liệu có thể là integer hoặc real.                             

D. Cả ba ý trên.

Câu 8. Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau: tb:= 0; For i:= 1 to 5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu?

A. 20                                    

B. 18                                                     

C. 21                                     

D. 22

B. Phần tự luận:

Câu 1. Viết chương trình tính tổng 10 số tự nhiên đầu tiên.

Câu 2. Viết chương trình tính tổng các số tự nhiên đầu tiên cho đến khi tổng đó bằng 100 thì dừng lại.

Câu 3. Viết chương trình nhập điểm kiểm tra học kỳ môn tin cho N học sinh và in ra màn hình. Với N và điểm kiểm tra được nhập từ bàn phím (sử dụng biến mảng).

C. Thực hành

Câu 1. Viết chương trình tính tổng 10 số tự nhiên đầu tiên.

Câu 2. Viết chương trình tính tổng các số tự nhiên đầu tiên cho đến khi tổng đó bằng 100 thì dừng lại.

Câu 3. (Viết chương trình nhập điểm kiểm tra học kỳ môn tin cho N học sinh và in ra màn hình. Với N và điểm kiểm tra được nhập từ bàn phím (sử dụng biến mảng).

Câu 4. Viết chương trình tìm phần tử nhỏ nhất và lớn nhất của dãy n số nhập vào từ bàn phím.

 

ĐÁP ÁN ĐỀ THI HỌC KÌ 2 MÔN TIN HỌC 8

A. Phần trắc nghiệm:

Câu

1

2

3

4

5

6

7

8

Đáp án

B

C

C

A

D

B

D

A

 

B. Phần tự luận: (8 điểm)

Câu 1:

Var s,i:integer;

begin

   S:= 0;

         For i:= 1 to 10 do s:=s+1;

               Writeln (‘tong cua 10 so tu nhien dau tien la:’,s);

         Readln

End.

Câu 2:

Var s,n:integer;

     Begin

         S:=0; n:=1;

             While (s<=100) do

                     Begin

                            S:=s+n; n:=n+1;       

                     End;

           Writen(‘tong cac so tu nhien dau tien:’,s);

              Readln

    End.

Câu 3:

Var n, i: integer;

Diem: array[1..50] of real;

Begin

      Write(‘Nhap so luong hoc sinh N = ‘); Readln(n);

       Writeln(‘Nhap diem cho tung hoc sinh’);

            For i := 1 to n do

                Begin

                    Write(‘Diem HS  ‘,i,’ = ‘); readln(Diem[i]);

                 End;

          For i : = 1 to n do

       Writeln(‘Diem cua HS ‘,i, ‘ = ‘,diem[i]);

Readln;

End.

...

Trên đây là một phần trích đoạn nội dung Đề thi HK2 năm 2020 môn Tin học 8 có đáp án Trường THCS Lương Thế Vinh. Để xem toàn bộ nội dung các em chọn chức năng xem online hoặc đăng nhập vào trang Chúng tôi để tải tài liệu về máy tính.

Hy vọng đề thi này sẽ giúp các em học sinh lớp 8 ôn tập tốt và đạt thành tích cao trong kì thi sắp tới.

Ngoài ra các em có thể tham khảo thêm một số tư liệu cùng chuyên mục sau đây:

Tham khảo thêm

Bình luận

Có Thể Bạn Quan Tâm ?