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ó

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 < x do Begin Y:=x+i; i:=i+5; end; Writeln('gia tri cua y:= ',y); End. A. Y = 46 B. Y = 26 C. Y = 54 D. Y = 36 Câu 8. Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện việc nào trong các việc sau: S:=0; For i:= 1 to n do S:=S+ A[i]; A. Không thực hiện việc nào trong B.Tính tổng các phần tử của mảng một chiều; C. In ra màn hình mảng A; D. Đếm số phần tử của mảng A; Câu 9. Khai báo sau cho biết: Const Max=200; Type Ar = array[1..Max] of byte; Var T: Ar; A. T là mảng có thể chứa tối đa 200 số thực. B. T là mảng chứa các số nguyên có giá trị từ 1 đến 200; C. T là mảng có thể chứa tối đa 200 số nguyên. D. T không phải là mảng. Câu 10. Cho biết đoạn chương trình sau tính tổng nào? S := 1; FOR i := 2 TO 10 DO S := S + 1/i; Mọi người giúp em với ạ, em cần gấp