
[<br>] 1. Trong ngôn ngữ lập trình Pascal, đoạn chương trình (mảng một chiều) sau thực hiện công việc gì ? S := 0 ; For i := 1 to n do If (a[i] mod 3 =0) or (a[i] mod 5 = 0) then S :=S+a[i] ; a. Tính tổng các phần tử trong mảng chia hết cho 3 hoặc chia hết cho 5 b. Tính tổng các phần tử chia hết cho 5 c. Tính tổng các phần tử trong mảng d. Tính tổng các phần tử chia hết cho 3 [<br>] 2. Cho khai báo mảng Var a : array[0..50] of real; và đoạn chương trình như sau: 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ì dưới đây? a. Tìm chỉ số của phần tử nhỏ nhất trong mảng; b. Tìm phần tử nhỏ nhất trong mảng; c. Tìm chỉ số của phần tử lớn nhất trong mảng; d. Tìm phần tử lớn nhất trong mảng; [<br>] 3. Mảng A dưới đây chứa bao nhiêu phần tử ? Const Rows=3 ; Var A:array[0..rows+1] of integer ; a. 5 b. 4 c. 3 d. 6 [<br>] 4. Cho x, y, z là các biến nguyên:
Begin x:=7; y:=5; z:=y; y: = x; x:=y; write(x,’ ‘, y); End. Sau khi thực hiện các lệnh thì giá trị của x, y là: a. x=5, y=7 b. x=7, y=7 c. x=7, y=5 d. x=7, y=12 [<br>] 5. Trong mảng một chiều, đoạn chương trình sau thực hiện công việc gì ? Dem := 0 ; For i := 1 to n do If a[i] mod 2 = 0 then Dem := Dem + 1 ; a. Đếm các phần tử chia hết cho 2 trong mảng b. Gán giá trị a[i] cho biến S c. Tính tổng các phần tử chia hết cho 2 trong mảng d. Tính tổng các phần tử trong mảng [<br>] 7. Cho hai xâu S1=‘abcd’ ; S2=‘ghk’ ; lệnh Insert(S1,S2,1) cho kết quả là ? a. ‘abcdghk’ b. ‘ghkabcd’ c. ‘gabcdgha’ d. ‘aghkbcd’ [<br>] 6. Đoạn chương trình for i:= 1 to 10 do write(i); Đưa ra màn hình kết quả nào: a. 1 2 3 4 5 6 7 8 9 10
ThuVienDeThi.com
b. Đưa ra 10 dấu cách c. 10 9 8 7 6 5 4 3 2 1 d. 12345678910 [<br>] 8. Cho khai báo mảng như sau: VAR M: ARRAY[0..10] OF Integer ; Phương án nào dưới đây chỉ phần tử thứ 10 của mảng ? A. M[9]; B. M(10); C. M[10]; D. M(9); [<br>] 9. Trong ngôn ngữ lập trình Pascal, khai báo nào trong các khai báo sau là SAI khi khai báo xâu kí tự ? A. VAR S : STRING; B. VAR S : STRING[256]; C. VAR X1 : STRING[100]; D. VAR X1 : STRING[1]; [<br>] 10. Cho ST 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(ST) DOWNTO 1 DO write(ST[i]) ; A. In từng kí tự ra màn hình theo thứ tự ngược, trừ kí tự đầu tiên; B. In xâu ra màn hình; C. In từng kí tự ra màn hình theo thứ tự ngược; D. In từng kí tự xâu ra màn hình; [<br>] 11. Cho xâu S:= ‘Ha_Noi_Mua_Thu’; Kết quả trả về cho S trong câu lệnh DELETE(S,7,10); là A. Ha_noi B. Ha Noi C. Lỗi cú pháp D. Ha_Noi [<br>] 12. Biểu diễn nào sau đây không phải là hằng trong Pascal? A. A20 B. ‘A20’ C. 20 D. 1.06E13 [<br>] 13. Khai báo nào sau đây là khai báo hằng số trong pascal? A. Const pi=3.14; B. Const pi:=3.14 C. Uses pi=3.14; D. Uses pi:=3.14; [<br>] 14. Tên nào sau đây đặt sai quy định của NNLT Pascal? A. Diem_Toan B. Diem Toan C. DiemToan D. D_Toan [<br>] 15. Tên nào sau đây đặt đúng quy định của NNLT Pascal? A. Diem_Toan B. Diem Toan C. DiemTo@n D. D-Toan [<br>] 16. Tên nào sau đây đặt đúng quy định
ThuVienDeThi.com
Trên đây là phần đầu tài liệu — bấm Đọc sách để xem đầy đủ.