NEW
Font size
WorksheetsTIN 11 BÀI 11 KIỂU MẢNG
Total questions: 18
Worksheet time: 9mins
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=N1(X1+X2+... + XN)
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=NS
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
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;
Đoạn chương trình sau đây thực hiện việc gì?
...
Randomize;
For i:= 1 to n do A[i] := random(50);
Tạo giá trị ngẫu nhiên cho mảng A gồm n phần tử (các giá trị nằm trong khoảng 0..50).
Tạo giá trị ngẫu nhiên cho mảng A gồm n phần tử
Tạo giá trị ngẫu nhiên cho mảng A gồm 50 phần tử
Tạo giá trị ngẫu nhiên cho mảng A gồm 49 phần tử
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 k:=i;
In giá trị của phần tử nguyên dương cuối cùng trong A ra màn hình
In chỉ số của phần tử nguyên dương đầu tiên trong A ra màn hình
In giá trị của phần tử nguyên dương đầu tiên trong A ra màn hình
In chỉ số của phần tử nguyên dương cuối cùng trong A ra màn hình
Cho khai báo: VAR Mang1d : ARRAY[-Nmax..Nmax] OF Integer;
Khai báo trên ĐÚNG trong trường hợp nào?
Nmax là một biến nguyên đã được khai báo trước đó.
Nmax phải là kiểu số nguyên hoặc kiểu ký tự hoặc kiểu logic.
Nmax là một hằng số nguyên đã được khai báo trước đó.
Mọi trường hợp.
Để in giá trị phần tử thứ 10 của mảng một chiều A ra màn hình ta viết:
Write(A[10]);
Write(A(10));
Readln(A[10]);
Write([10]);
Cho khai báo:
Var A: Array[1..10] of Real;
i : Integer;
Ðể nhập dữ liệu cho A, chọn câu nào:
For i:=1 to 10 do Begin Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); End;
For i:=1 to 10 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]);
For i:=1 to 10 do Readln(‘ Nhập A[‘, i, ‘]:’);
Write(‘ Nhập A:’); Readln(A);
Cách làm việc với mảng một chiều như thế nào?
Thông qua tên biến và chỉ số của mảng.
Thông qua tên biến mảng.
Thông qua chỉ số của mảng.
Làm việc trực tiếp với mảng.
Chỉ số của mảng có thể là kiểu gì ?
Kiểu số thực, kiểu logic
Kiểu miền con, kiểu kí tự
Kiểu số nguyên, kiểu số thực
Kiểu đếm được
Mỗi phần tử của mảng phải:
Có kiểu dữ liệu khác nhau.
Có thể có kiểu dữ liệu giống hoặc khác nhau.
Có kiểu dữ liệu giống nhau.
Tất cả các phương án đều sai.
Các phần tử của mảng có thể thuộc các kiểu dữ liệu nào ?
Kiểu kí tự
Kiểu số thực
Kiểu logic
Cả ba kiểu trên
