Câu 39: Trong Pascal, câu lệnh nào sau đây được viết đúng? A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10 writeln(‘A’); C. for i:= 1 to 10 do wr

Câu 39: Trong Pascal, câu lệnh nào sau đây được viết đúng?
A. for i:= 4 to 1 do writeln(‘A’);
B. for i= 1 to 10 writeln(‘A’);
C. for i:= 1 to 10 do writeln(‘A’);
D. for i to 10 do writeln(‘A’);
Câu 40: Trong câu lệnh lặp:
For i := 1 to 10 do j:= j + 2; write( j );
Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?
A. 10 lần B. 1 lần C. 5 lần D. Không thực hiện.
Câu 41: Cho đoạn chương trình: J:= 0; For i:= 1 to 5 do J:= J + i; 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. 12 B. 22 C. 15 D. 42.
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 = to do ;
B. For : = to do ;
C. For := to do ;
D. For = to do
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
MAI E THI RỒI MN GIÚP E VS :<.