Ontap
Chia sẻ bởi Hồ Thị Kim Loan |
Ngày 27/04/2019 |
92
Chia sẻ tài liệu: ontap thuộc Tin học 10
Nội dung tài liệu:
PHẦN TRẮC NGHIỆM M ẢNG 1 CHI ỀU
Câu 1: Chọn khai báo đúng :
A .Var A: array[1..10] of integer; B .Var A= array[1..10] of integer;
C. Var A:= array[1..10] of integer; D. Var A: array[1,10] of integer;
Câu 2: Cho khai báo:
Var
A: Array[1..4] of Real;
i : Integer ;
Ðể nhập dữ liệu cho A, chọn câu nào :
a) For i:=1 to 4 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]);
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) Write(‘ Nhập A:’); Readln(A);
Câu 3: Cho khai báo biến :
Var A : array[1..5] of Integer;
Chọn lệnh đúng :
A. A[1] := 4/2 ; B. A[2] := -6 ; C. A(3) := 6 ; D. A := 10 ;
Câu 4: Trong khai báo sau còn bỏ trống .. một chỗ, vì chưa xác định được kiểu dữ liệu của biến Max:
Var
A: Array[a..d] of Real ;
Ch : Char ;
Max : . . . ;
Muốn biến Max lưu gía trị lớn nhất của mảng A thì cần khai báo biến Max kiểu gì vào chỗ . . .
A. Char B. Integer C. String D. Real
Câu 5: Cho khai báo:
Var
A: Array[1..4] of Integer ;
i : Integer ;
Sau khi thực hiện các lệnh :
For i:=1 to 4 do A[i]:= i;
For i:=1 to 4 do A[i]:= A[i]+1;
thì mảng A có gía trị là :
A. A[1]=1, A[2]=2, A[3]=3, A[4]=4 B. A[1]=2, A[2]=3, A[3]=4, A[4]=5
C. A[1]=0, A[2]=1, A[3]=2, A[4]=3 D. A[1]=1, A[2]=1, A[3]=1, A[4]=1
Câu 6. Cho đoạn lệnh A[1]:=5; A[2]:=4; A[3]:=9; A[4]:=8;
for i:=4 downto 1 do
write(A[i]:4);
A. 8 9 4 5 B. 1 2 3 4 C. 5 4 9 8 D. 4 3 2 1
Câu 7. Trong NNLT Pascal, cho khai báo sau
Var b:array[1..10] of integer;
Hãy chọn lệnh gán đúng trong các lệnh sau đây
A. b[5]:=6.5; B. b:=8; C. b[1]:=5; D. b[11]:=8;
Câu 8. giá trị của biến gt trong đoạn chương trình sau: pt:=1; n:=5; while n<5 do pt:=gt+1;
A. 6 B. 1 C. 7 D. 5
Câu 9. Cho mảng A gồm các phần tử: 3; -7; 9; 5; -3; 6; 8; 17; 0; -15. Cho biết giá trị của m sau đoạn chương trình:
m:=A[1]; For i:=1 to 10 do If A[i] > m then m := A[i];
A. 6 B. -15 C. 17 D. 3
Câu 10. Cho đoạn lệnh sau:
Const n= 100;
Var A: Array[1..n] of Byte; Kqua:byte;
Begin
……
For i: = 1 To n Do
Kqua:=Kqua+A[i];
End;
Chọn phương án em cho là đúng nhất khi chạy đoạn chương trình trên
A. Tính tổng các phần tử trong mảng một chiều
B. Tính tích các phần tử trong mảng một chiểu
C. Sai về mặt ngữ nghĩa
D. Tính tổng các phần tử trong mảng hai chiều
Câu 1: Chọn khai báo đúng :
A .Var A: array[1..10] of integer; B .Var A= array[1..10] of integer;
C. Var A:= array[1..10] of integer; D. Var A: array[1,10] of integer;
Câu 2: Cho khai báo:
Var
A: Array[1..4] of Real;
i : Integer ;
Ðể nhập dữ liệu cho A, chọn câu nào :
a) For i:=1 to 4 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]);
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) Write(‘ Nhập A:’); Readln(A);
Câu 3: Cho khai báo biến :
Var A : array[1..5] of Integer;
Chọn lệnh đúng :
A. A[1] := 4/2 ; B. A[2] := -6 ; C. A(3) := 6 ; D. A := 10 ;
Câu 4: Trong khai báo sau còn bỏ trống .. một chỗ, vì chưa xác định được kiểu dữ liệu của biến Max:
Var
A: Array[a..d] of Real ;
Ch : Char ;
Max : . . . ;
Muốn biến Max lưu gía trị lớn nhất của mảng A thì cần khai báo biến Max kiểu gì vào chỗ . . .
A. Char B. Integer C. String D. Real
Câu 5: Cho khai báo:
Var
A: Array[1..4] of Integer ;
i : Integer ;
Sau khi thực hiện các lệnh :
For i:=1 to 4 do A[i]:= i;
For i:=1 to 4 do A[i]:= A[i]+1;
thì mảng A có gía trị là :
A. A[1]=1, A[2]=2, A[3]=3, A[4]=4 B. A[1]=2, A[2]=3, A[3]=4, A[4]=5
C. A[1]=0, A[2]=1, A[3]=2, A[4]=3 D. A[1]=1, A[2]=1, A[3]=1, A[4]=1
Câu 6. Cho đoạn lệnh A[1]:=5; A[2]:=4; A[3]:=9; A[4]:=8;
for i:=4 downto 1 do
write(A[i]:4);
A. 8 9 4 5 B. 1 2 3 4 C. 5 4 9 8 D. 4 3 2 1
Câu 7. Trong NNLT Pascal, cho khai báo sau
Var b:array[1..10] of integer;
Hãy chọn lệnh gán đúng trong các lệnh sau đây
A. b[5]:=6.5; B. b:=8; C. b[1]:=5; D. b[11]:=8;
Câu 8. giá trị của biến gt trong đoạn chương trình sau: pt:=1; n:=5; while n<5 do pt:=gt+1;
A. 6 B. 1 C. 7 D. 5
Câu 9. Cho mảng A gồm các phần tử: 3; -7; 9; 5; -3; 6; 8; 17; 0; -15. Cho biết giá trị của m sau đoạn chương trình:
m:=A[1]; For i:=1 to 10 do If A[i] > m then m := A[i];
A. 6 B. -15 C. 17 D. 3
Câu 10. Cho đoạn lệnh sau:
Const n= 100;
Var A: Array[1..n] of Byte; Kqua:byte;
Begin
……
For i: = 1 To n Do
Kqua:=Kqua+A[i];
End;
Chọn phương án em cho là đúng nhất khi chạy đoạn chương trình trên
A. Tính tổng các phần tử trong mảng một chiều
B. Tính tích các phần tử trong mảng một chiểu
C. Sai về mặt ngữ nghĩa
D. Tính tổng các phần tử trong mảng hai chiều
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: Hồ Thị Kim Loan
Dung lượng: |
Lượt tài: 1
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)