Bài giảng Tin học Lớp 11 - Phan Thị Luân

KÝnh chµo c¸c thÇy c« vÒ dù tiÕt häc líp 11A9	Gi¸o viªn: Phan ThÞ Lu©n Tr­êng THPT Lý Th¸i Tæ – Tõ S¬n – B¾c Ninhm«n: Tin häckiÓm tra bµi còCâu 1: Chọn khai báo đúng :a) Var A: array[1..10] of integer; 	c) Var A:= array[1..10] of integer;b) Var A= array[1..10] of integer;	d) Var A: array[1,10] of integer;Câu 2: Cho khai báoVar A: Array[1..4] of Real i : Integer ;Ðể nhập dữ liệu cho A, chọn câu nào : a) Write(‘ Nhập A:’); Readln(A)b) For i:=1 to 4 do Readln(‘ Nhập A[‘, i, ‘]:’); c) For i:=1 to 4 do Begin Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); End; d) For i:=1 to 4 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); Câu 3: Cho khai báo biến :Var A : array[1..5] of Integer;A[1] := 4/2 ; b) A[2] := -6 ; c) A(3) := 6 ; d) A := 10;Hãy chọn phép toán gán đúng?Câu 4: Khai báo nào đúng :Var A : array[1..n,1..m] of integer; Const n=2; m=3; Var A: array[1..n,1..m] of integer;c) Var A: array[3, 2] of Integer;d) Var n, m : integer ; A: array[1..n,1..m] of integer; Câu 5: Cho khai báo :    Var A : array[1..2,1..3] of Real;      i, j : integer;    Ðể nhập dữ liệu cho ma trận A, chọn Write(‘ Nhập A:’); Readln(A) ;b) For i:=1 to 2 do Readln(A[i, j]);c) For i:=1 to 2 do      For j:=1 to 3 do       begin         write(‘Nhập A[‘, i, j, ‘]:’);        readln(A[i, j]);       end;d) For i:=1 to 2 do     For j:=1 to 3 do        write(‘Nhập A[‘, i, j, ‘]:’);       readln(A[i, j]);Câu 6: Cho khai báo :    Var A : array[1..2,1..3] of Real;      i, j : integer; Max : Real;    Ðể tìm số lớn nhất của ma trận A, chọn câu nào:Max:=A[1,1];     If Max = 'a') and (St[i] <= 'z') then St[i]:= Upcase (St[i]);      Write (St);    End.    -Chương trình in ra :Hom Nay Thuc Tap c) Hom nay thuc tapb) hom nay thuc tap d) HOM NAY THUC TAPCâu 12: Cho St là biến xâu và St:=’AAABAAB’;     Sau khi thực hiện hai lệnh :    While St[1]=’A’ do Delete(St,1,1);    Write(St);    Kết qủa in ra là:a) AABAAB b) BAAB c) BB d) AAAKÝnh chóc c¸c thÇy c« m¹nh khoÎ!Chóc c¸c em häc tèt!