Đang tải... (xem toàn văn)
Câu 18 : Trong ngôn ngữ lập trình pascal, trong quá trình nhập dữ liệu của mảng một chiều, để giá trị i cũng tăng theo phần tử thứ i ta viết như sau:.. kí tự có số thứ tự nhỏ nhất tro[r]
(1)KIỂM TRA TIẾT Môn: Tin học
Họ tên:……… Lớp:………… Đề:
Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
A
B
C
D
I TRẮC NGHIỆM
Câu : Khái báo mảng chiều sau đúng: A Type.dayso=array[1 250] of Integer;
Var dayso:A;
B Var dayso=array[1 250] of Integer; C Type dayso=array[1 250] of Integer;
Var A: dayso;
D Type dayso: array[1 250] of Integer; Var dayso;
Câu : Phát biểu sau không đúng?
A. Mảng chiều dãy hữu hạn phần tử kiểu B. Xâu dãy ký tự mã ASCII
C. Mảng hai chiều dãy hữu hạn phần tử kiểu D. Mảng hai chiều bảng phần tử kiểu
Câu : Var A:array[1 366] of Integer; Câu lệnh thực công việc:
A Khai báo trực tiếp mảng chiều gồm 366 phần tử nguyên. B Khai báo gián tiếp mảng chiều gồm 366 phần tử nguyên
C Khai báo gián tiếp mảng chiều gồm 366 phần tử nguyên dương. D Khai báo trực tiếp mảng chiều gồm 366 phần tử nguyên dương Câu :
A Xuất giá trị phần tử mảng A chiều B Nhập vào giá trị phần tử mảng A hai chiều C Xuất giá trị phần tử mảng A hai chiều D Nhập vào giá trị phần tử mảng A chiều Câu : S = 'Xin chao'
(2)Câu : IF Length(a) > Length(b) Then write(a) else write(b);
A So sánh độ dài xâu a xâu b, xâu a dài b thi in xâu a ngược lại in xâu b B So sánh độ dài b a, xâu a dài b thi in xâu a ngược lại in xâu b
C So sánh độ dài xâu a xâu b, xâu a dài b thi in xâu a ngược lại in xâu a D So sánh độ dài xâu a xâu b, xâu a dài b thi in xâu b ngược lại in xâu a Câu : Type Bang = array[1 9,1 9] of integer;
Var A: Bang;
A Khai báo trực tiếp mảng chiều gồm phần tử nguyên dương B Khai báo gián tiếp mảng chiều gồm phần tử nguyên dương. C Khai báo gián tiếp mảng chiều gồm 81 phần tử nguyên
D Khai báo trực tiếp mảng chiều gồm phần tử nguyên Câu : S = 'Truong*THPT*Tra On';
Copy(S,7,6);
A S= ' *THPT*' B S= 'THPT* ' C S= '*THPT* D S= '*THPT*' Câu :
A Xuất giá trị phần tử mảng A chiều B Nhập vào giá trị phần tử mảng A hai chiều C Xuất giá trị phần tử mảng A hai chiều D Nhập vào giá trị phần tử mảng A chiều
Câu 10 : Khai báo sau đúng?
A. var hoten:string[27];
B. var diachi: string(100);
C. var hoten=string[30];
D. var ho=string(20);
Câu 11 : Trên liệu kiểu xâu có phép tốn nào?
A. phép toán so sánh phép gán
B. phép so sánh phép nối
C. phép gán phép nối
D. phép gán, phép nối phép so sánh Câu 12 : Số phần tử mảng chiều là:
A. vô hạn B. có giới hạn
C. có nhiều 100 phần tử D. có nhiều 1000 phần tử Câu 13 : Xâu ‘bbaa’ xâu
(3)Câu 14 :
A Đổi chỗ A[i] với A[i+1]
B Sắp xếp mảng chiều A thành giải giảm
C Sắp xếp số i mảng chiều A thành giải giảm D Sắp xếp mảng chiều A thành giải không giảm
Câu 15 : S = 'Lop 11a5 de thuong' Delete(S,1,3);
A S= '11a5 de thuong' B S= ' 11a5 de thuong'
C S= '11a5de thuong' D S= ' 11a5dethuong'
Câu 16 : Var s :String;
A Khai báo xâu s không đúng B Khai báo xâu s có độ dài ký tự
C Khai báo xâu s có độ dài 256 ký tự D Khai báo xâu s có độ dài 255 ký tự
Câu 17 : Để khai báo mảng chiều cần:
A. Mô tả kiểu phần tử
B. Mô tả số lượng phần tử
C. Mô tả kiểu phần tử cách đánh số phần tử
D. Mơ tả cách đánh số phần tử
Câu 18 : Trong ngơn ngữ lập trình pascal, trình nhập liệu mảng chiều, để giá trị i tăng theo phần tử thứ i ta viết sau:
A Write("A[",i,"]="); readln(A[i]); B Write('A[',i,']='); readln(A[i]); C Write('A[i]='); readln(A[i]); D Write('A['i']='); readln(A[i]); Câu 19 : Xét chương trình sau:
Var I, s: integer; Begin
S:=0;
For i:=1 to I mod 2=1 then s:=s+1; Writeln(s);
End
Kết chương trình là:
A B C D Câu 20 : Hàm length(s) cho giá trị là:
A. độ dài xâu s
B. kí tự xâu s C. kí tự cuối xâu s
(4)II TỰ LUẬN (5 điểm) Câu : (3 điểm)
Viết chương trình nhập vào mảng chiều số nguyên rồi in hình: a Giá trị trung bình phần tử mản
b Đếm số phần tử có giá trị lớn giá trị trung bành Câu : Điền vào chỗ trống (…) bảng sau:
Giá trị st Biểu thức Kết quả
‘Lop 11A5’ Length(st) ………