Câu 7: Trong Pascal, câu lệnh nào sau đây là đúng?
A. S:=1;
B. S:=2; While S<10 do write(S);
C. n:=2 while n<5 do write(‘A’);
D. Cả A và B.
Câu 42: Cho đoạn chương trình:
J:= 0;
For i:= 1 to 5 do J:= J+ 1;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?
A. 2 B. 3 C. 4 D. 5
Câu 43: Khi thực hiện đoạn chương trình sau:
n:=1; T:=14;
While n>20 do
begin
n:=n+5;
T:=T – n;
end;
Hãy cho biết giá trị của biến T bằng bao nhiêu?
A. 14 B. 15 C. 16 D. 17
Câu 44: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau:
tb:= 0;
For i:= 1 to 5 do tb := tb + A[i];
Giá trị của biến tb là bao nhiêu?
A. 20; B . 18; C. 21; D . 22;
Câu 45: Trong các cách khai báo biến mảng dưới đây, cách khai báo nào là đúng:
A. Var A: array[1..5.5] of integer;
B. Var A:array(1..100) of integer;
C. Var A: array[1.5..100] of integer;
D. Var A: array[1..100] of integer;
Câu 46: Cho đoạn chương trình Pascal sau đây:
tong:= 20;
While tong>= 10 do
tong:=tong – 1;
Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:
A. 19 B. 9 C. 21 D. 10
Câu 47: Sau khi đoạn chương trình sau được thực hiện, giá trị của biến S bằng bao nhiêu:
S:= 0;
for i:= 1 to 5 do S:= S + 1;
A. 5 B. 10 C. 15 D. 20
Câu 48: Khi thực hiện đoạn chương trình sau:
n:= 1; T:= 50;
While n>20 do
begin
n:=n+5;
T:=T – n
end;
Hãy cho biết giá trị của biến T bằng bao nhiêu?
A. 14 B. 17 C. 16 D. 50
Câu 49: Khai báo biến mảng: A : array[1..7] of real ; . Sử dụng câu lệnh For i := 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
A. 4 B. 5 C. 6 D. 7
Câu 50: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau: tb := 0; For i := 1 to 5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu?
A. 20 B. 18 C. 21 D. 22
Câu 51: Em hiểu câu lệnh lặp theo nghĩa nào dưới đây?
A. Một lệnh thay cho nhiều lệnh.
B. Các câu lệnh được viết lặp đi lặp lại nhiều lần.
C. Vì câu lệnh đã có tên là lệnh lặp.
D. Cả a, b, c đều sai.
Câu 52: Cho đoạn chương trình sau:
n:=1;
While n<10 do
Begin
n:=n+1;
Writeln(‘ xin chao’);
end;
Khi thực hiện chương trình câu “ xin chao” được viết ra màn hình mấy lần?
A. 0 B.10 C. 9 D. Vòng lặp vô tận.
Câu 53: Cách viết câu lệnh lặp với số lần biết trước như sau:
A. For
B. For
C. For
D. For
Câu 54: Cho đoạn chương trình: j := 0; k := 2;
For i := 1 to 5 do j := j + 2; k := k + j;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến k bằng bao nhiêu?
A. 12; B. 22; C. 32; D. 42.
7) B
42) D
43) D
44) A
45) D
46) B
47) C
48) C
49) B
50) A
51) B
52) D
53) C
54) A
7b
42d
43D
44A
45d
46b
47c
48c
49b
50a
51d
52d
53c
54a