Bài 11: KÍCH MẢNG MỘT CHỀU

Chọn khai báo đúng:

• Var A: array[1..20] of integer;

• Var A= array[1..20] of integer;

• Var A:= array[1..20] of integer;

• Var A: array[1,20] of integer;

Cho biết ý nghĩa của đoạn khai báo sau:

Const Max = 100;

Type Dayso = ARRAY[1..Max] Of real;

Var A : Dayso;

• Khai báo biến Dayso gồm max số nguyên.

• Khai báo biến Dayso gồm 100 số thực.

• Khai báo biến mảng A gồm max số nguyên.

• Khai báo biến A gồm tối đa 100 số thực.

Cho khai báo biến: Var A : array[1..5] of Integer; Chọn lệnh đúng:

• A[1] := 6/2 ;

• A[2] := -10 ;

• A(3) := 6 ;

• A := 10 ;

Cho X1, X2,...Xn là một mảng số thực. Ðể tính:
 $S=\frac{1}{N}\left(X1+X2+...\ +\ XN\right)$  
ta có đoạn chương trình sau gồm ba lệnh, một lệnh còn bỏ trống . . . :
   S:=0;
   For i:=1 to N do S := S + X[i];
   . . .
Hãy điền lệnh thích hợp vào chỗ . . . :

• Write ('S=', S);

• Readln (S);

• S := S/N;

•  $S=\frac{S}{N}$  

Cho câu lệnh: FOR i:=1 TO 100 DO A[i]:= Random(100) - Random(100);

Hãy cho biết giá trị của mảng A trong câu lệnh trên nhận giá trị nguyên trong đoạn nào?

• Từ -99 đến 99

• Từ -99 đến 100

• Từ -100 đến 100

• Từ -100 đến 99

Trong khai báo sau còn bỏ trống . . . một chỗ, vì chưa xác định được kiểu dữ liệu của biến Max:

Var A: Array[‘a’..’d’] of Real;

Ch : Char ;

Max : . . . ;

Muốn biến Max lưu giá trị lớn nhất của mảng A thì cần khai báo biến Max kiểu dữ liệu gì vào chỗ . . . :

• Real

• Char

• Integer

• String

Muốn tham chiếu đến một phần tử nào đó trong mảng ta cần phải có tối thiểu các thông tin

• Tên kiểu mảng, tên biến mảng

• Chỉ số phần tử, tên kiểu mảng

• Tên biến mảng, chỉ số phần tử

• Giá trị của phần tử, biến mảng

Cho khai báo:

Var A: Array[1..4] of Integer;

i : Integer;

Sau khi thực hiện các lệnh:

For i:=1 to 4 do A[i]:= i;

For i:=1 to 4 do A[i]:= A[i]+1;

thì mảng A có giá trị là:

• A[1]=0, A[2]=1, A[3]=2, A[4]=3

• A[1]=1, A[2]=1, A[3]=1, A[4]=1

• A[1]=1, A[2]=2, A[3]=3, A[4]=4

• A[1]=2, A[2]=3, A[3]=4, A[4]=5

Cho mảng A gồm N số nguyên. Đoạn chương trình sau thực hiện công việc gì?

FOR i:=1 TO N DO

IF A[i] < 0 THEN Write(A[i]);

• In ra màn hình các số nguyên âm

• In ra màn hình các số nguyên âm

• Kiểm tra phần tử thứ i là dương hay âm

• Không làm gì cả

Khai báo biến mảng một chiều A gồm n số nguyên (0 < n <= 50) có dạng:

• TYPE A : ARRAY [1..50] OF Integer;

• Var A = ARRAY [1..50] OF Integer;

• Var A : ARRAY[1..50] OF Integer;

• TYPE A = ARRAY [1..50] OF Integer;