KT15p_lần 1

KIỂM TRA 15’.
MÔN TIN HỌC 11.
1/ Khai báo nào sau đây là đúng cú pháp? a. Type 1mang = array [1..100] of byte; b. Type mang1c = array [1-100] of byte; c. Type mang1c = array (1..100) of byte; d. Type mang1c = array [1..100] of byte; 2/ Đoạn chương trình sau khi thực hiện cho kết quả gì? Var a:array[1..3] of byte; i:byte; Begin For i:=1 to 3 do a[i]:=i; For i:=1 to 3 do If a[i] mod 2 = 0 then Write(a[i]); End. 3/ Trong Pascal, để xuất tất cả các phần tử của mảng 1 chiều ta dùng mấy vòng For? a. 0 b. 1 c. 2 d. 3 4/ Đoạn chương trình sau làm gi? S:=0; For i:=1 to n do S:=S+a[i]; a. Đếm số phần tử của mảng A b. In ra mảng A c. Tính tổng các phần tử của mảng A d. Nhập mảng A 5/ Khai báo sau đây thì mảng a có tối đa bao nhiêu phần tử? Var a:array [1..10] of byte; a. 11 b. 10 c. 9 d. 110 6/ Chương trình sau sẽ viết ra cái gì trên màn hình? For i:=1 to n do If a[i] mod 2 =1 then Write(a[i]); a. Viết ra tổng của mảng a b. Viết ra các số lẻ của mảng a c. Viết ra tất cả các số của mảng a d. Viết ra các số chẳn của mảng a 7/ Đoạn chương trình sau dùng để làm gì?
For i:=1 to n do
Begin
Writeln(‘ phan tu thu’, i);
Read(a[i]);
End;
a. Đếm phần tử của mảng b. Tính tổng các phần tử của mảng
c. Nhập các phần tử của mảng. d. Xuất các phần tử của mảng.
8/ Với khai báo A:array[1..100] of integer; thì việc truy xuất đến phần tử thứ 5 như sau:
a. A(5) b.A[5] c. A5 d. A 5
9/. Cú pháp để khai báo mảng một chiều trực tiếp là:
a. Var < tên biến mảng> : array[kiểu chỉ số] ;
b. Type < tên biến mảng> : array[kiểu chỉ số] ;
c. Var < tên biến mảng> : array[kiểu chỉ số] of ;
d. Type < tên biến mảng> : array[kiểu chỉ số] of ;
10/ Số phần tử của mảng một chiều là:
a. Vô hạn b. Có nhiều nhất 100 phần tử
c. Có giới hạn d. Có nhiều nhất 1000 phần tử.
11/ Viết chương trình thực hiện các công việc sau:
Nhập dãy A gồm n (n< 100) số nguyên dương có giá trị không quá 250.
Đưa ra màn hình dãy số A vừa nhập.
Đếm số lượng các số chẵn trong dãy A trên.