Kiểm tra 15p - lần 2- HK2

TRƯỜNG THPT NHA MÂN
Họ và tên:……………………………..
Lớp:11………

KIỂM TRA 15 PHÚT
Môn: Tin học 11


Bài 1. Những khai báo sau đây đúng hay sai:
Câu
Khai báo
Đúng(Đ)
Sai(S)

1
Var xau: string[275];



2
Type xau = string;
Var x, y: xau;



3
Type ten: string[25];
Var hoten: ten;



4
Var s1, s2: string;
x, y: string[10];



5
Type xau = string[200];
Var xau: string [200];



Bài 2. So sánh các xâu sau:
Câu
Giá trị xâu A
Giá trị xâu B
Kết quả

1
‘tin hoc’
‘tin hoc pascal’


2
‘Ba’
‘Anh’


3
‘lop 11CB2’
‘lop 11CB2’


Bài 3. Điền vào chổ trống (…) trong bảng sau:
Câu 1:
Giá trị s1
Giá trị s2
Thao tác
Kết quả

a./‘ cua Me’
‘Em se la mua xuan’
Insert(……., s2,……);
‘Em se la mua xuan cua Me’

b./...............
‘ABGHI’
Insert(……., s2,……);
‘ABCDEGHI’

Câu 2:
Giá trị của st
Thao tác
Kết quả

a./ ‘abcdef’
Delete (st, ……….., ………..)
‘abef’

b./ ‘Xuan da ve tren cao nguyen’
Delete (st, 5, 6)
………………….

Câu 3
Giá trị của st
Thao tác
Kết quả

a./ ‘Co 123 em’
b./ ‘Tong so 123 em’
c./ ‘Tong so 123 em’
Length(st)
Pos(‘123’, st)
Copy (st,………..,…………)
………
……….
‘123’

Bài 4. Cho biết chương trính sau đây làm gì? Hãy viết lại dòng thứ 9 để chương trình in ra tất cả những số nguyên xuất hiện trong một xâu nhập từ bàn phím.
(1)
Program vidu;

(2)
Var s, t : string;

(3)
 i: integer;

(4)
Begin

(5)
 Write (‘ nhap mot xau: ‘);

(6)
 Readln (s)

(7)
 t:= ‘’;

(8)
 For i:= 1 to length (s) do

(9)
 If (s[i] >= ‘A’) and ( s[i] <= ‘Z’) then t: = t + s[i];

(10)
Writeln (‘ Ket qua la:’, t);

(11)
Readln

(12)
End.
………………………………………………………………………………………….
………………………………………………………………………………………….
………………………………………………………………………………………….
………………………………………………………………………………………….



TRẮC NGHIỆM CỦNG CỐ
Trong ngôn ngữ lập trình(NNLT) Pascal, khai báo nào trong các khai báo sau là sai
khi khai báo xâu kí tự?
Var s : string ;
var s1 : string [100];
var s : string [256];
var s1: string [1];
Trong NNLT Pascal, phần tử đầu tiên của xâu kí tự mang chỉ số là:
0
Do người lập trình khai báo
Không có chỉ số
1
Trong NNLT Pascal, sau khi thực hiện xong đoạn chương trình sau, giá trị của biến S là:
S : = ‘Em yeu truong em’;
Delete (S, 7, 10);
Insert(‘Truong em ’, S, 1);
Em yeu Truong em
Truong em em yeu truong em
Truong em Em yeu
Em yeu
Trong NNLT Pascal, với xâu kí tự có các phép toán là:
Phép cộng, trừ, nhân, chia
Phép cộng và phép trừ
Chỉ có phép cộng
Phép ghép xâu và phép so sánh
Trong NNLT Pascal, để xóa đi kí tự đầu tiên của xâu kí tự St ta viết:
Delete ( St, 1, 1)
Delete ( St, vt, 1)
Delete ( St, length(St), 1)
Delete ( St, 1, n)
Họ tên:………………………………………………………….Lớp:……………………..
……………………………………………………………………………………………………………..
Họ tên:……………………………………………………..Lớp:………………………..
TRẮC NGHIỆM CỦNG CỐ
Trong ngôn ngữ lập trình(NNLT) Pascal, khai báo nào trong các khai báo sau là sai
khi khai báo xâu kí tự?
Var s : string ;
var s1 : string [100];
var s : string [256];
var s1: string [1];
Trong NNLT Pascal, phần tử đầu tiên của xâu kí tự mang chỉ số là: