Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng1. Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng A: Chỉ số đầu và chỉ số cuối là hai số nguyên B: Chỉ số đầu nhỏ hơn chỉ số cuối C: Kiểu dữ liệu có thể là integer hoặc real D: Cả 3 ý trên 2. Khi thực hiện đoạn chương trình sau: n:=1; T:=50; while n>20 do begin n:=n+5; T:=T-n end; hãy cho biết giá trị của biến T bằng bao nhiêu? A: 17 B: 15 C: 16 D: 14 3. Trong câu lệnh lặp For i:=1 to 10 do begin...end; câu lệnh ghép được thực hiện bao nhiêu? A: 1 B: 10 C: Không lần nào D: 2 4. Sau khi thực hiện đoạn chương trình sau, giá trị của biến a bằng bao nhiêu? a:=0; For i:=1 to 3 do a:=a+1 A: 3 B: 4 C: 6 D: 2 5. Khai báo biến mảng: A: array[1..7] of real; Sử dụng câu lệnh For i:=1 to 5 do readln (A[i]); để dán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị? A: 5 B: 6 C: 4 D: 7 6. Cách khai báo biến mảng nào sau đây trong pascal đúng? A: Var X: Array [10,13] of integer B: Var X: Array [4..10] of real C: Var X: Array [10..1] of integer D: Var X: Array [3,4..4,8] of integer 7. Trong pascal, câu lệnh nào sau đây được viết đúng? A: For i:=4 to 1 do writeln ('A'); B: For i:=1 to 10 writeln ('A'); C: For i:=1 to 10 do writeln ('A'); D: For i to 10 writeln ('A'); 8. Cho đoạn chương trình sau: J:=0; For i:=1 to 4 do j:=j+2; Sau khi thực hiện đoạn chương trình trên giá trị của biến j bằng bao nhiêu? A: 4 B: 6 C: 8 D: 10 9. If a>8 thenthen b:=3 Else b:=5, khi a nhận giá trị là 0 thìthì b nhận giá trị nào? A: 0 B: 3 C: 8 D: 5 10. Trong pascal, câu lệnh Writeln (16 mod 3) sẽ in lên màn hình kết quả là bao nhiêu? A: 5 B: 1 C: 16 D: 3 11. Để tìm giá trị lớn nhất của hai số a, b thì ta viết A: Max:=a; if b> Max then Max:= b; B: If ( a>b ) then Max:=a; if ( b>a ) then Max:=b; C: Max:=b; if b> Max then Max:=a; D: Cả 3 đều đúng 12. Câu lệnh pascal nào sau đây hợp lệ? A: I:=1; S:= 0; While S<5 do begin S:= S+i; i:= i+1; end; B: I=1; S:= 0; While S<5 do begin S:= S+i; i:= i+1 end; C: I=1; S:= 0 While S<5 do i:= i+1; D: I=1; S:= 0; While S<5 do i:= i+1; S:= S+i; Làm chính xác cho mình với ạ |