Câu 1. Cho khai báo Var A: Array[1..4] of Integer ; i : Integer ; sau khi thực hiện các lệnh A[i]:= 0; For i:=1 to 4 do A[i]:= A[i]+1; thì mảng A có gía trị là : A. A[1]=2, A[2]=3, A[3]=4, A[4]=5 B. A[1]=1, A[2]=2, A[3]=3, A[4]=4 C. A[1]=1, A[2]=1, A[3]=1, A[4]=1 D. A[1]=0, A[2]=1, A[3]=2, A[4]=3 Câu 2. Đoạn chương trình sau đây thực hiện công việc gì? Begin c:=a; a:=b; b:=c; End; A. Hoán đổi giá trị của hai biến b và c cho nhau. B. Hoán đổi giá trị của hai biến a và c cho nhau. C. Gán giá trị các biến cho b. D. Hoán đổi giá trị của hai biến a và b cho nhau. Câu 3. Trong NNLT Pascal, chọn đúng nhất, để nhập dữ liệu cho mảng một chiều A ta viết A. write("a[",i,"]=");readln(a[i]); B. write('a[' i ']=');readln(a[i]); C. write('a[',i,']=');readln(a[i]); D. write('a[i]=');readln(a[i]); Câu 4. Chọn phát biểu đúng cho biến d trong đoạn chương trình sau: d:=0; For i:=1 to N do if a[i] mod 4 =0 then d:=d+1; A. Đếm các phần tử là bội số của 4 nó trong mảng a. B. Tổng các phần tử là bội số của 4 nó trong mảng a. C. Đếm các phần tử chẳn. D. Tổng các phần tử lẻ. Câu 5. Chương trình sau làm việc gì? Var A: array [1..50] of byte; i: integer; Begin For i:= 1 to 10 do write(A[i],' '); Readln End. A. Nhập các phần tử cho mảng A B. xuat các phần tử mảng A ra màn hình C. Tính tổng các phần tử của mảng A D. Đếm số các phần tử của mảng A Câu 6. Chọn đáp án đúng nhất,trong NNLT Pascal A. Các phần tử của mảng một chiều được sắp thứ tự theo chỉ số; B. Các phần tử của mảng một chiều không sắp thứ tự; C. Các phần tử của mảng một chiều được sắp thứ tự giá trị tăng dần; D. Các phần tử của mảng một chiều được sắp thứ tự giá trị giảm dần; Câu 7. Chương trình sau trả về giá trị bao nhiêu? Var y, x, i:byte; Begin X:=20; i:=1; y = 0; While i