Sở GD&ĐT Đề Kiểm Tra Học Kì 2 năm học 2021 2022 Trường THPT Môn Tin học Họ và tên HS Lớp 11B Trắc nghiệm Câu 1 Khai báo nào sau đây là đúng cú pháp ? A Type mang1c = array (1 100) of byte; B T[.]
Sở GD&ĐT……… Trường THPT…… Đề Kiểm Tra Học Kì năm học 2021 - 2022 Môn: Tin học Họ và tên HS: Lớp: 11B: Trắc nghiệm: Câu 1: Khai báo sau cú pháp ? A Type mang1c = array (1 100) of byte; B Type mang1c = array [1 100] of byte; C Type mang1c = array [1-100] of byte; D Type 1mang = array [1 100] of byte; Câu 2: Cho khai báo sau: var a,b:string; Đáp án sau A Đây khai báo chuỗi vơ số kí tự B Đây khai báo chuỗi gồm 200 kí tự C Đây khai báo mảng chiều D Đây khai báo chuỗi gồm 255 kí tự Câu 3: Cho câu lệnh sau Begin Write('Phan tu thu',i,'='); readln(A[i]); end; Câu lệnh làm gì? A Nhập vào i phần tử mảng A B Xuất hình gồm i phần tử mảng A C Nhập vào vị trí thứ i mảng A D Xuất hình vị trí mảng A Câu 4: Để xuất mảng A vừa nhập vào từ bàn phím ta thự lệnh sau A Write(A[i]:4); B read(A[i]); C Write('A[i]:4') D readln(A[i]); Câu 5: Cho câu đoạn lệnh sau For i= to N if A[i]>max the Begin Max=A[i]; Csmax=i; end; Đoạn lệnh sai chỗ nào? A Vòng lặp For B lệnh gán = C Lệnh If Câu 6: Lệnh Write(A[i]) passcal thực cơng việc gì? A Là câu thơng báo B In hình phần tử mảng A C Thực tính giá trị A D Nhập vào số hạng mảng A Câu 7: Câu lệnh sau thực in mảng chiều hình A For i :=1 to n B For i :=1 to n Begin Begin for j:= to n write(A[i,j]); for j:= to n write('A[i,j]'); writeln; writeln; end; end; C For i =1 to n D For i :=1 to n Begin for j:= to n write(A[i,j]); for j= to n write(A[i,j]); writeln; writeln; end; Câu 8: Cho khai báo sau, đâu khai báo mảng chiều? A type mang2c := array[1 9:1 8] of integer; var A,B:mang2c; B type mang2c = array[1 9,1 8] of integer; var A,B:mang2c; C var A,B:mang2c; D type mang2c := array[1 9,1 8] of integer; var A,B:mang2c; Câu 9: Cho mảng A có 15 dịng 13 cột, để in hình phần tử dòng 7, cột ta viết: A Write(A[7,5]); B Write(A[5,7]); C Write(A:7:5); D Write(A,7,5); Câu 10: Cách khai báo sau mảng chiều A Type Mang = array[1 10] of integer; B Type Mang = array[1 10] of integer; var Mang: A; var A:Mang; C Type Mang:=array[1 10] of integer; D Type Mang = array[1 10] of integer; var A: Mang; var A:Mang; Tự Luận: Em viết chương trình hoàn chỉnh nhập vào mảng chiều và xuất màn hình mảng vừa nhập, biết phần tử mảng là số nguyên ... A,B:mang2c; D type mang2c := array[1 9,1 8] of integer; var A,B:mang2c; Câu 9: Cho mảng A có 15 dịng 13 cột, để in hình phần tử dịng 7, cột ta viết: A Write(A[7,5]); B Write(A[5,7]); C Write(A:7:5);