Câu 16:

Đoạn lệnh sau đây sẽ cho kết quả gì?
so:=1;
While so < 10 do writeln(so);
so:=so + 1;

A. 
In ra vô hạn các số 1, mỗi số trên một dòng;

B. 
In ra các số từ 1 đến 9;

C. 
Không phương án nào đúng

D. 
In ra các số từ 1 đến 10;

Đáp án của bạn:

• A
• B
• C
• D

Câu 17:

Em hãy chọn phát biểu đúng khi nói về dữ liệu kiểu mảng:

A. 
Dữ liệu kiểu mảng là tập hợp các phần tử không có thứ tự và mọi phần tử có cùng một kiểu dữ liệu

B. 
Tất cả ý trên đều sai

C. 
Dữ liệu kiểu mảng là tập hợp các phần tử có thứ tự và mọi phần tử có cùng một kiểu dữ liệu

D. 
Dữ liệu kiểu mảng là tập hợp các phần tử có thứ tự và mỗi một phần tử trong mảng có thể có các kiểu dữ liệu khác nhau

Đáp án của bạn:

• A
• B
• C
• D

Câu 18:

Chọn câu phát biểu đúng về kiểu dữ liệu của mảng?

A. 
Kiểu dữ liệu của mảng chỉ có thể là kiểu số nguyên, số thực, kiểu logic, kiểu ký tự

B. 
Kiểu dữ liệu của mảng là kiểu của các phần tử của mảng, là Integer hoặc Real

C. 
Kiểu dữ liệu của mảng phải được định nghĩa trước thông qua từ khóa VAR

D. 
Có thể dùng tất cả các kiểu dữ liệu để làm kiểu dữ liệu của mảng

Đáp án của bạn:

• A
• B
• C
• D

Câu 19:

Hãy đưa ra kết quả trong đoạn lệnh:
   x:=1; While x<=5 do write(‘Hoa hau’);

A. 
Không có kết quả.

B. 
Hoa hau

C. 
X>=5

D. 
x:=1

Đáp án của bạn:

• A
• B
• C
• D

Câu 20:

Cú pháp câu lệnh lặp với số lần biết trước là:

A. 
For : to do ;

B. 
For := to do ;

C. 
Tất cả đều sai

D. 
For = to do

Đáp án của bạn:

• A
• B
• C
• D

Câu 21:

Câu lệnh Pascal sau câu nào đúng ?

A. 
For i := 10 to 1 do x :=x+1 ;

B. 
For i :=1 to 10 for j :=1 to 10 do x :=x+1 ;

C. 
For i :=1 to 10 do x :=x+1 ;
D. 
For i := 1 to 10; do x :=x+1;

Đáp án của bạn:

• A
• B
• C
• D

Câu 22:

Cho khai báo mảng như sau: Var a : array[0..30] of integer ;
   Để in giá trị phần tử thứ 20 của mảng một chiều A ra màn hình ta viết:

A. 
Write(A[20]);

B. 
Write(A(20));

C. 
Write([20]);

D. 
Readln(A[20]);

Đáp án của bạn:

• A
• B
• C
• D

Câu 23:

Hãy tìm hiểu đoạn chương trình sau đây : Sau khi đoạn chương trình sau được thực hiện, câu lệnh lặp được thực hiện bao nhiêu lần?
Var a: integer;
Begin
A:=2020;
While a<2021 do writeln(‘Mon Tin hoc 8’);
End.

A. 
2018
B. 
2021
C. 
Vô hạn

D. 
2020

Đáp án của bạn:

• A
• B
• C
• D

Câu 24:

Cách khai báo biến mảng sau đây là đúng?

A. 
Var X: Array[10 .. 1] of Integer;

B. 
Var X: Array[10 , 13] of Real;

C. 
Var X: Array[4 .. 10] of Real;

D. 
Var X: Array[3.. 4.8] of Integer;

Đáp án của bạn:

• A
• B
• C
• D

Câu 25:

Hãy tìm hiểu đoạn chương trình sau và tìm giá trị của T ?
Var T, i: integer;
Begin
T:=0; i:=1;
While i<10 do begin i:=i+1; T:=T+1; Write (T);
End.

A. 
9

B. 
10
C. 
2018
D. 
2020

Đáp án của bạn:

• A
• B
• C
• D