03/05/2014 12:48 pm
I. TRẮC NGHIỆM: (6 điểm) Hãy khoanh tròn vào câu trả lời đúng nhất Câu 1: Cách viết nào sau đây là đúng khi khai báo mảng một chiều? A. Var <Kiểu chỉ số>: array[tên biến mảng] of <kiểu phần tử>; B. Var <tên biến mảng>: array[kiểu chỉ số] of <kiểu phần tử>; C. Var <Array> of <kiểu phần tử>; D. Var <Kiểu phần tử>: array[kiểu chỉ số] of <tên biến mảng>; Câu 2: Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện công việc: Readln(s); k:= length(S); for i:= k downto 1 do write(S[i]); A. in ra màn hình xâu S B. in ra màn hình độ dài xâu S C. in ra màn hình xâu S đảo ngược D. đưa ra màn hình xâu S Câu 3: Cách tham chiếu đến phần tử của mảng: A. <Tên biến mảng>[<chỉ số>]; B. <Tên biến mảng>[<kiểu chỉ số>]; C. <Tên biến mảng>[<kiểu mảng>]; D. <Tên biến mảng>[<kiểu phần tử>]; Câu 4: Với khai báo A: array[1..100] of integer; thì việc truy xuất đến phần tử thứ 7 như sau: A. A(7) B. A[7] C. A7 D. A 7 Câu 5: Trong Pascal, để khai báo biến tệp văn bản ta sử dụng cú pháp: A. Var <tên tệp> : text; B. Var <tên biến tệp> : text; C. Var <tên tệp>: string; D. Var <tên biến tệp>: string; Câu 6: Cho s=’abcdefghi’ hàm copy(s,2,3) cho giá trị bằng: A. bcd B. ‘bcd’ C. ‘cd’ D. cd Câu 7: Cho s=’Kon Tum VietNam’, hàm length(s) cho giá trị bằng: A. 16 B. 15 C. ‘16’ D. ‘15’ Câu 8: Thủ tục insert(‘123’,’abc’,2) sẽ cho xâu kết quả nào sau đây? A. a123bc B. 1abc23 C. 12abc D. ab123 Câu 9: Cho xâu s=’abcdefghi’ sau khi thực hiện thủ tục delete(s,3,4) thì: A. s=’abchi’ B. s=’abcdi’ C. s=’abghi’ D. s=” Câu 10: Cho A=’abc’; B=’ABC’; khi đó A+B cho kết quả nào? A. ‘aAbBcC’ B. ‘abcABC’ C. ‘AaBbCc’ D. ‘ABCabc’ Câu 11: Trong các khai báo sau, khai báo nào đúng? A. var hoten : string[27]; B. var diachi : string(100); C. var ten= string[30]; D. var ho = string(20); Câu 12: Sau khi thực hiện đoạn lệnh sau: S:=0; For i:=1 to 4 do S:=S+i; S có giá trị là: A. 10 B. 4 C. 1 D. 8
II. TỰ LUẬN: ( 4 điểm ) Câu 1: a) Hãy viết lệnh khai báo mảng để mô tả: Một dãy số nguyên A có 100 phần tử b) Hãy điền vào các lệnh còn thiếu để chương trình sau cho phép nhập mảng một chiều: Program nhapinm1chieu; Var A: Array[1..100] of real; i, N: integer; Begin Write(‘Nhap n= ’); readln(n); For i:=1 to ............. Begin Write(‘A[‘, i,’]=’);................. End; Readln End. Câu 2: Viết chương trình Pascal: Tính tổng S = 1 + 3 + 5 + 7 + . . . + (2n 1), Biết n là một số tự nhiên khác 0 nhập vào từ bàn phím. NẮM CHẮC KIẾN THỨC, BỨT PHÁ ĐIỂM 9,10 LỚP 1 - LỚP 12 CÙNG TUYENSINH247! Nếu em đang:
Tuyensinh247 giúp em:
Xem thêm thông tin khoá học & Nhận tư vấn miễn phí - TẠI ĐÂY |