Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện các câu lệnh (Giả sử X là biến thuộc kiểu dữ liệu số nguyên đã được khai báo trong chương trình):

X:=3;

if (200 mod 2 = 0) then X := X div 3;

• Không có đáp án đúng

• 0

• 1

• 2

Kết quả của đoạn chương trình sau là bao nhiêu (giả sử a, tích là biến thuộc kiểu dữ liệu số nguyên đã được khai báo trong chương trình):

a:=3;

tich:=1;

while (a>0) do

begin

tich := tich * a;

a := a -1;

end;

write(tich);

• Không có đáp án đúng

• 5

• 6

• 4

Hãy cho biết kết quả của câu lệnh lặp sau:

for i:= 1 to 5 do write(i, ' ');

• Không có đáp án đúng

• 2 4

• 1 2 3 4 5

• 1 3 5

Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước:

• if...then

• While...do

• if...then...else

• For...do

Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh?

• "A nho hon B"

• 2*5 := 10

• 3 <> 7

• 20 div 2

Cho khai báo mảng sau: Var A:array[1..10] of integer;

Câu lệnh gán nào sau đây là hợp lệ cho phần tử thứ 1 của mảng A:

• Không có đáp án đúng

• A 1 := 1;

• A[1] := 1;

• A[1] = 1;

• A[1] := 1.5;

Kết quả của đoạn chương trình sau:

For i:= 1 to 20 do writeln('Kiem Tra HK2');

• in ra màn hình 20 dòng chữ Kiểm Tra HK2 (không có dấu nháy đơn)

• in ra màn hình 19 dòng chữ Kiểm Tra HK2 (không có dấu nháy đơn)

• Đáp án khác

• in ra màn hình 21 dòng chữ Kiểm Tra HK2 (không có dấu nháy đơn)

Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng cú pháp:

• for i = 0 to 99 do write(i);

• for i := 0 to 99; do write(i);

• for i := 99 to 0 do write(i);

• for i := 0 to 99 do write(i);

Hãy cho biết kết quả của đoạn chương trình dưới đây (giả sử diem là biến thuộc kiểu dữ liệu số nguyên đã được khai báo trong chương trình):

diem := 10;

while (diem > 0) do writeln(diem);

• Trên màn hình xuất hiện 10 chữ diem

• Chương trình bị lặp vô tận

• Trên màn hình xuất hiện một số 10

• Trên màn hình xuất hiện mười số 10

Hãy cho biết giá trị của biến n bằng bao nhiêu sau khi thực hiện các câu lệnh (giả sử n là biến thuộc kiểu dữ liệu số nguyên đã được khai báo trong chương trình):

n := 20;

If n >20 then n := n mod 20

Else n := n div 2;

• 20

• Đáp án khác

• 10

• 0