BTH 7-Tin 8

Câu 1: Số phần tử trong khai báo dưới đây là bao nhiêu?

Var hocsinh : array[12..80] of integer;

• 80

• 70

• 69

• 68

Câu 2:Khai báo mảng nào là đúng trong các khai báo sau đây:

•  var tuoi : array[1..15] of integer;

• var tuoi : array[1.5..10.5] of integer;

   

•  

    var tuoi : aray[1..15] of real;

   

• var tuoi : array[1 … 15 ] of integer;

Câu 3:Cú pháp khai báo dãy số nào sau đây đúng nhất?

• Var < tên dãy số > : array [ < chỉ số cuối > .. < chỉ số đầu >] of < kiểu dữ liệu >;

• Var < tên dãy số > : array [ < chỉ số đầu > .. < chỉ số cuối > ] of < kiểu dữ liệu >;

•  Var < tên dãy số > : array [ < chỉ số cuối > : < chỉ số đầu > ] of < kiểu dữ liệu >;

• Var < tên dãy số > : array [ < chỉ số đầu > .. < chỉ số cuối >] for < kiểu dữ liệu >;

Câu 4:Để nhập dữ liệu từ bàn phím cho mảng A có 10 phần tử là số nguyên ta dùng lệnh nào sau đây?

• For i:=1 to 10 do Readln(A[i]);

• For i:= 1 to 10 do Writeln(A[i]);

• Dùng 10 lệnh Readln(A);

• Cả (A), (B), (C) đều sai

Câu 5:Các cách nhập dữ liệu cho biến mảng sau, cách nhập nào không hợp lệ?

•  readln(B[1]);

    

• readln(dientich[i]);

• readln(B5);

• read(dayso[9]);

Câu 6: 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:

• Write(A[20]);

• Write(A(20));

• Readln(A[20]);

• Write([20]);

Câu 7: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

• Chỉ số đầu và chỉ số cuối là 2 số nguyên;

• Chỉ số đầu nhỏ hơn chỉ số cuối;

• Kiểu dữ liệu có thể là integer hoặc real;

• Cả ba ý trên;

Câu 10: 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?

• 20

•   18    

•     21    

•    22

Câu 9: Trong câu lệnh lặp for…do, số vòng lặp là biết trước và bằng:

• giá trị cuối – giá trị đầu + 1

• giá trị cuối – giá trị đầu + 2

• giá trị cuối – giá trị đầu + 3

• giá trị cuối – giá trị đầu + 4

Câu 10: câu lệnh lặp For i:= 2 to 5 do Writeln(‘Day la lan lap thu ‘,i); sẽ in ra màn hình mấy dòng chữ?

• 1

• 4

• 3

• 5