Một chương trình con nhất thiết phải có tham số hình thức và cũng có thể không có biến cục bộ.. Một chương trình con nhất thiết phải có tham số hình thức, không nhất thiết phải có biến c[r]
Trang 1SỞ GIÁO DỤC VÀ ĐÀO TẠO ĐĂK NÔNG KỲ THI CUỐI NĂM, NĂM HỌC 2009 – 2010
Thời gian: 45 phút (không kể thời gian giao đề)
Họ tên thí sinh: Số báo danh:
Câu 1: Với A là mảng một chiều số nguyên và có N phần tử, cho đoạn chương trình sau:
S := 0;
For i := 1 to N do S := S + A[ i ];
Đoạn chương trình trên thực hiện việc gì?
Câu 2: Cho đoạn chương trình sau:
S := 'Hoang Anh Tuan';
X := ' ';
i := length(S);
While S[ i ] < >' ' do
Begin
X := X + S[ i ];
i := i - 1;
End;
Sau khi thực hiện đoạn chương trình trên, biến X có giá trị là:
Câu 3: Khẳng định nào đúng?
A Một chương trình con nhất thiết phải có tham số hình thức và cũng có thể không có biến cục bộ.
B Một chương trình con nhất thiết phải có tham số hình thức, không nhất thiết phải có biến cục bộ.
C Một chương trình con nhất thiết phải có tham số hình thức.
D Một chương trình con nhất thiết phải có biến cục bộ.
Câu 4: Nói về cấu trúc của một chương trình con, khẳng định nào không đúng?
A Phần khai báo có thể có hoặc không tuỳ thuộc vào từng chương trình.
B Phần đầu nhất thiết phải có để khai báo tên chương trình con.
C Phần thân không có cũng được.
D Phần đầu có thể có hoặc không cũng được.
Câu 5: Nếu hàm EOLN(<tên biến tệp>) cho giá trị là TRUE thì con trỏ tệp nằm ở vị trí nào?
Câu 6: Cho str là một xâu kí tự, đoạn chương trình sau thực hiện công việc gì ?
For i := length(str) downto 1 do write(str[i]);
A In từng kí tự ra màn hình theo thứ tự ngược và trừ kí tự trống.
B In xâu ra màn hình.
C In từng kí tự của xâu ra màn hình.
D In từng kí tự ra màn hình theo thứ tự ngược.
Trang 2Câu 7: Để khai báo số phần tử của mảng một chiều trong Pascal, người lập trình cần:
A khai báo chỉ số bắt đầu và kết thúc của mảng.
B khai báo chỉ số kết thúc của mảng.
C không cần khai báo gì, hệ thống sẽ tự xác định.
D khai báo một hằng số là số phần tử của mảng.
Câu 8: Cho khai báo sau:
Var hoten : String;
Phát biểu nào đúng?
A Câu lệnh sai vì thiếu độ dài tối đa của xâu B Xâu có độ dài lớn nhất là 255.
C Cần phải khai báo kích thước của xâu sau đó D Xâu có độ dài lớn nhất là 0.
Câu 9: Khai báo mảng 2 chiều nào là đúng?
A Type 2chieu = array [1 100,1 100] of char;
B Type mang = array [1-100,1-100] of char;
C Type mang2c = array [1 100][1 100] of char;
D Type mang2c = array [1 100,1 100] of char;
Câu 10: Khai báo mảng một chiều nào đúng?
Câu 11: Xâu kí tự là:
A mảng các kí tự.
B tập hợp các chữ cái và các chữ số trong bảng chữ cái tiếng Anh.
C tập hợp các chữ cái trong bảng chữ cái tiếng Anh.
D dãy các kí tự trong bảng mã ASCII.
Câu 12: Cho khai báo mảng và đoạn chương trình:
Var a : array[0 50] of real ;
k := 0 ;
for i := 1 to 50 do
if a[i] > a[k] then k := i ;
Đoạn chương trình trên thực hiện công việc gì?
C Tìm chỉ số của phần tử nhỏ nhất trong mảng D Tìm phần tử lớn nhất trong mảng.
Câu 13: Cho xâu S1 := 'Mon hoc', S2 := 'Tin' Lệnh insert(S1,S2,4), cho kết quả:
Câu 14: Cho khai báo mảng như sau: Var A: array[0 10] of integer;
Để tham chiếu đến phần tử thứ 10 của mảng ta dùng:
Câu 15: Câu nào nói về kiểu dữ liệu của hàm là đúng?
A Chỉ có thể là kiểu real.
B Có thể là các kiểu integer, real, char, boolean, string.
C Có thể là integer, real, char, boolean, string, record.
D Chỉ có thể là kiểu integer.
Trang 3Câu 16: Đoạn chương trình:
Program Welcome ;
Var a: string[10];
Begin
a := ‘tin hoc’;
writeln(length(a));
End.
in ra kết quả là:
Câu 17: Cho f là một biến tệp văn bản Khai báo nào đúng?
Câu 18: Cho a là biến nguyên (a = 6) và khai báo thủ tục:
Procedure TT( Var y : Integer) ;
Begin
y := y +1;
End;
Sau khi gọi thủ tục TT(a);
Giá trị của biến a là :
Câu 19: Khai báo Var x, y: integer; và thủ tục
Procedure Doicho(Var a:integer; b: integer);
Var tg: integer;
Begin
tg:=a; a:=b; b:=tg;
End;
Begin
x:=2; y:=5;
Doicho(x,y);
Writeln(x,y);
End.
Kết quả thu được sau thủ tục trên là:
Câu 20: Để đọc dữ liệu từ tệp văn bản, ta sử dụng thủ tục:
A read(<tên biến tệp>,<danh sách biến>); B write(<tên tệp>,<danh sách kết quả>);
C read(<tên tệp>,<danh sách biến>); D write(<tên biến tệp>,<danh sách kết quả>); Câu 21: Cho đoạn chương trình sau:
Var a, b: integer;
Begin
a:=10; b:=11;
If a<b then write(-1) else write(1);
End.
Sau khi chạy chương trình kết quả là:
Trang 4Câu 22: Để ghi kết quả vào tệp văn bản ta sử dụng thủ tục:
A Read(<tên tệp>,<danh sách biến>); B Write(<tên biến tệp>,<danh sách kết quả>);
C Read(<tên biến tệp>,<danh sách biến>); D Write(<tên tệp>,<danh sách kết quả>);
Câu 23: Để xoá đi kí tự đầu tiên của xâu kí tự S ta viết:
Câu 24: Trong Pascal, với S là một xâu Hàm length(S) cho kết quả là:
A số kí tự hiện có của xâu S.
B độ dài xâu S khi khai báo.
C số kí tự hiện có của xâu S không tính các dấu cách.
D số kí tự của xâu S không tính dấu cách cuối cùng.
Câu 25: Cho xâu st = 'Nguyen Van An'.
Kết quả khi thực hiện thủ tục Delete(st,7,4) là:
Câu 26: Để gán tên biến tệp cho tệp ta sử dụng câu lệnh:
A <tên biến tệp> := <tên têp>; B <tên tệp> := <tên biến têp>;
C assign(<tên tệp>,<tên biến têp>); D assign(<tên biến tệp>,<tên têp>);
Câu 27: Đoạn chương trình sau thực hiện công việc gì?
d := 0;
For i := 1 to length(S) do
If S[ i ] = ' ' then d := d + 1;
Câu 28: Cho khai báo biến và khai báo đầu của thủ tục như sau:
Var x, S: integer; ch:char;
Procedure TT(y:integer; kytu:char);
Lệnh gọi thủ tục nào đúng?
Câu 29: Cho khai báo mảng Var A:Array[1 100,1 100] of integer; tham chiếu đến các phần tử trong
mảng là:
Câu 30: Hai xâu kí tự được so sánh dựa trên:
A độ dài thực sự của hai xâu.
B mã của từng kí tự (trong bảng mã ASCII) trong các xâu lần lượt từ trái sang phải.
C độ dài tối đa của hai xâu.
D số lượng các kí tự khác nhau trong xâu.
……… HẾT ………