Câu 11. Trong NNLT Pascal, giả sử mảng A có giá trị như sau: A[1], A[2],…A[5] có giá trị lần lượt là 2, -3, 5, 7, -1 Tìm câu lệnh để in giá trị tất cả các phần tử trong mảng ra màn hình: A. for i:=1 to 5 do write(A[i]); B. for i:=1 to 5 do write(A[1]); C. for i:=1 to 5 do write(A[5]); D. for i:=1 to 5 do write(A[2]); Câu 12. Cho đoạn chương trình sau: S:=0; For i:=1 To 10 Do If i mod 2<>0 then S:=S+i*i; A. Đoạn chương trình trên dùng tính tổng các số lẻ từ 1 đến 10 B. Đoạn chương trình trên dùng tính tổng bình phương các số lẻ từ 1 đến 10 C. Đoạn chương trình trên dùng tính tổng bình phương các số từ 1 đến 10 D. Đoạn chương trình trên dùng tính tổng các số chẵn từ 1 đến 10 Câu 13. Trong khai báo sau còn bỏ trống . . . một chỗ, vì chưa xác định kiểu dữ liệu của biến Max : Var A: Array['a'..'d'] of Real ; C : Char ; Max : . . . ; Muốn biến Max lưu giá trị lớn nhất của mảng A thì cần khai báo kiểu dữ liệu cho biến Max là A. Real B. Char C. String D. Integer Câu 14. Chọn phát biểu đúng cho biến t trong đoạn chương trình sau: t:=0; For i:=1 to N do if (a[i] mod 2=0) and (a[i]>25) then t:=t+1; A. Tổng các phần tử có giá trị chẵn trong mảng a. B. Đếm các phần tử lớn hơn 25 trong mảng a. C. Đếm các phần tử chẵn lớn hơn 25 trong mảng a. D. Tổng các phần tử chẵn lớn hơn 25 trong mảng a. Câu 15. Trong NNLT Pascal, cho khai báo sau: Var b: array[1..10] of integer; Hãy chọn lệnh gán nào đúng sau đây: A. b[11]:=8; B. b[1]:=5; C. b[5]:=6.5; D. b:=8; Câu 16. Cho khai báo biến : Var A : array[1..5] of Integer; Chọn lệnh gán đúng A. A[1] := 4/2 ; B. A := 10 ; C. A(3) := 6 ; D.A[2] := -6 ; Câu 17. Cho đoạn chương trình: for i:=1 to 9 do if (9 mod i <>0) then. write (i); Kết quả xuất ra màn hình là: A. 1 2 4 6 8 10 B. 1 3 5 7 9 C. 2 4 5 6 7 8 D. 1 3 6 7 8 Câu 18. Trong các câu lệnh sau câu lệnh nào đúng ? A. While (x>5) and (x<10) Do x=x-1 B. While x>5 and x<10 Do x:=x-1; C. While (x>5) and (x<10); Do x:=x-1 D. While (x>5) and (x>10) Do x:=x-1; Câu 19. Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình: i:=1; While i <3 do Begin Write('Hello Word'); i:=i+2; End; Chữ 'Hello Word'được in ra màn hình mấy lần? A. 4 B. 3 C. 1 D. 2 Câu 20. Xét chương trình sau: Var i, s: integer; Begin S:=0; For i:=1 to 5 do s:=s+i; Writeln(s); End. Kết quả của chương trình trên là: A. 15 B. 5 C. 10 D. 0 Câu 21. Đoạn chương trình sau viết ra màn hình: For i:=1 to 5 do Write(i*2); A. 1 2 3 4 5 B. 1 2 4 6 8 C. 1 3 5 7 9 D. 2 4 6 8 10 Câu 22. Đoạn chương trình nào sau đây tính tổng các số chẵn từ 1 đến n. A. s:=0; For i := 1 to n do if i div 2 = 0 then s := s + i; B. s:=0; For i := 1 to n do if i mod 2 <> 0 then s := s + i; C. s:=1; For i := 1 to n do if i mod 2 = 1 then s := s + i; D. s:=0; For i := 1 to n do if i mod 2 = 0 then s := s + i; Câu 23. Với định nghĩa Type Mang2 = array [1..19] of integer; thì khai báo biến nào sau đây đúng? A. Var Bang : Mang; B. Var Bang1 : Mang2; C. Var 1Bang : Mang2; D. Var 1Bang; Câu 24. Chương trình sau cho kết quả của biến gt là: gt:=1; For i:=1 to 5 do gt:=gt * i; Write(gt); A. 64 B. 120 C. 24 D. 15 Câu 25. Cách viết nào sau đây là đúng trong câu lệnh lặp For: A. FOR <biến đếm> := <giá trị đầu> DOWNTO <giá trị cuối> DO <Câu lệnh> ; B. FOR <biến đếm> = <giá trị đầu> TO <giá trị cuối> DO <Câu lệnh> ; C. FOR <biến đếm> := <giá trị cuối> TO <giá trị đầu> DO <Câu lệnh> ; D. FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO <Câu lệnh> ; Câu 24. Chọn khai báo đúng : A. Var A:= array[1..10] of integer; B. Var A: array[1..10] of integer; C. Var A: array[1,10] of integer; D. Var A= array[1..10] of integer; Mn giúp em với ạ