Ctrl/Cmd+V
Câu 11: Sau khi thực hiện đoạn chương trình sau:
k: = 0;
For i:= 1 to 3 do k:= k + 2; Sau khi chạy chương trình, giá trị của biến k bằng bao nhiêu?
A. 6 B. 8 C. 5 D. 2
Câu 12: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp chưa biết trước ?:
A. if...then B. if...then...else C. for...do D. while...do
Câu 13: Hãy đọc đoạn chương trình sau:
s:= 0;
for i:= 1 to 5 do s := s + 1; Sau khi thực hiện xong, kết quả s bằng:A. 10 B. 16 C. 21 D. 15
Câu14: Câu lệnh lặp:
For i:=1 to 5 do
Writeln(‘Day la lan lap thu ‘,i); sau khi in ra màn hình 5 dòng chữ trong đó dòng thứ 3 có nội
dung là:
A. Day la lan lap thu i
B. Day la lan lap thu, i
C. Day la lan lap thu 3
D. Day la lan lap thu , 3
Câu 15: Điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :
A. Phép gán B. Câu lệnh đơn C. Câu lệnh ghép D. Phép so sánh
Câu 16: Trong câu lệnh lặp:
For i:=0 to 100 do
Begin
…
End;
Câu lệnh ghép được thực hiện bao nhiêu lần (hay bao nhiêu vòng lặp được thực hiện)?
A. 102 B. 101 C. 100 D. 99
Câu 17: Trong câu lệnh lặp :
For i : = 1 to 10 do begin … end ;
Câu lệnh ghép được thực hiện bao nhiêu lần ?
A. Không lần nào. B. 1 lần. C. 2 lần. D. 10 lần.
Câu 18: Sau khi thực hiện đoạn chương trình Pascal :
x:=3; For i : = 1 to 3 do x : = x – 1; x sẽ nhận được giá trị nào dưới đây ?
A. 0; B. 1 ; C. -4 ; D. – 1;
Câu 19: Xét chương trình Pascal sau :
var n,i, T : Integer;
begin
T:=0;
write(‘Nhap so: ’);
readln(n);
for i:=1 to n do
begin
if i mod 2 = 0 then
T:=T + i;
end;
writeln (T);
readln;
end.
Chương trình trên làm nhiện vụ:
A. in ra màn hình số tổng các số lẽ từ 1 đến n.
B. in ra màn hình tất cả các số nguyên tố nhỏ hơn hoặc bằng n.
C. in ra màn hình số tổng các số chẵn từ 1 đến n.
D. in ra màn hình số nguyên tố lớn hơn hoặc bằng n và gần n nhất.
Câu 20 : Giả sử x, i, j là ba biến kiểu Integer. Xét đoạn chương trình Pascal sau:
x:=1; For i:=1 to 3 do For j:=i to 3 do x := x + i*j; Writeln (x);
Đoạn chương trình trên sẽ in ra màn hình giá trị là:
A. 26 B. 37 C. 9 D. 13
Câu 21: Câu lệnh pascal nào sau đây là hợp lệ?
A. For i:= ’1’ to ‘10’ do writeln(‘A’);
B. For i:= 2.5 to 10.5 do writeln(‘A’);
C. For i = 1 to 10 do writeln(‘A’);
D. For i:= 1 to 10 do writeln(‘A’)
Câu 22: Trong câu lệnh lặp for … do của Pascal, trong mỗi vòng lặp, biến đếm thay đổi
như thế nào?
A. +1 B. +1 hoặc -1 C. Một giá trị bất kì D. Một giá trị khác 0
Câu 23: Sau khi thực hiện đoạn chương trình Pascal
For i:=1 to m do Begin y:=x; x:=y-i; end.Chúng ta sẽ nhận được kết quả như thế nào?
A. x=x-m B. x=i-x C. x=x-i D. i=0 và x=y-1
Câu 24: Trong đoạn chương trình sau, hãy cho biết lệnh writeln in ra màn hình giá trị của
j và k là bao nhiêu?
j:=2; k:=3; for i:=1 to 5 do j:=j+1; k:=k+j; cach:= ‘ ’; writeln(j,cach,k);
A. j=10, k=7 B. j=7, k=10 C. j=8, k=11 D. j=11, k=8
Câu 25: Trong đoạn chương trình sau, hãy cho biết lệnh writeln in ra màn hình giá trị của
j và k là bao nhiêu?
j:=2; k:=3; for i:=1 to 5 do begin j:=j+1; k:=k+j; end; cach:= ‘ ’; writeln(j,cach,k);
A. j=10, k=28 B. j=7, k=7 C. j=7, k=28 D. j=10, k=28
Câu 26: Trong đoạn chương trình sau, hãy cho biết lệnh writeln in ra màn hình giá trị của
j và k là bao nhiêu?
j:=2; k:=3;
for i:=1 to 5 do if i mod 2 = 0 then j:=j+1; k:=k+j; cach:= ‘ ’; writeln(j,cach,k);
A. j=10, k=28 B. j=7, k=7 C. j=7, k=28 D. j=4, k=7
Câu 27: Trong câu lệnh lặp for i:=1 to 10 do begin s:=s+i; t:=t+s; end; câu lệnh ghép được thực
hiện bao nhiêu lần
A. 1 B. 10 C. 100 D. 1000 Ctrl/Cmd+V
