Câu 1: câu lệnh viết đúng cú pháp là
a.While<điều kiện> to<câu lệnh>;
b.While<điều kiện> do <câu lệnh>;
c.While<điều kiện> to<câu lệnh1> do;
d.While<điều kiện>; do<câu lệnh>;
Câu 2: Hoạt động nào sau đây có thể tính toán được số lần làm việc
a.Múc từng gáo nước đầy bể
b.Đi lên tầng, đén tầng 10 thì dừng
c. Học cho tới khi thuộc bài
d. Nhặt từng cọng rau cho đến khi xong
Câu 3: Vòng lặp while... do là vòng lặp
a.Biết trước số vòng lặp
b. Biết trước số vòng lặp nhưng giói hạn là <=100
c.Chưa biết trước số lần lặp
d. Biết trước số lần lặp nhưng giới hạn là >=10
Câu 4: Trong ngôn ngữ pascal, đoạn chương trình sau đưa ra kết quả gì?
Fow i:=1 to 10 do write (i,'');
a. 1 2 3 4 5 6 7 8 9 10
b.10 9 8 7 6 5 4 3 2 1
c. Đưa ra 10 đấu cách
d.Không đưa ra kết quả gì
Câu 5: Phần mềm giúp em học vẽ hình là?
a. Sun times
b.Yenka
c. Finger break out
d.geogebra
Câu 6: Khai báo biến mảng nào đúng
a. Var Y: Array[6..20] of Integer;
b.Var Y; Array[10.5..25.5] of Real;
c.Var Y: Array[10,50] of Integer;
d.Var Y: Array[30..15] of Real;
Câu 7: Để nhập một giá trị vào phần tử a[3] của mảng a thì ta viết là
a. Readln(a)
b.Readln(a[3])
c.Readln(a[i])
d.Readln(a(3))
Câu 8: Đoạn lệnh sau đây sẽ cho kết quả gì?
so := 1;
While so < 10 do writeln(so);
so:=so+1;
a.In ra vô hạn các số 1, mỗi số trên một dòng
b.Không phương án nào đúng
c. In ra các số từ 1 đến 9
d. In ra các số từ 1 đến 10
Câu 9: Để tính tổng S=1/2+1/4+1/6+...+1/n; em chọn đoạn lệnh
a. for i:=1 to n do b.for i:=1 to n do
if (i mod 2)= 0 then S:=S-1/i ; Else S := S+1/i
if (i mod 2) = 0 then S:=S+1/i;
c.for i:= 1 to 10 do d.for i:=2 to n do
if (i mod 2) <>0 then S=S+i; if (i mod 2) <> ) then S:= S=S +i/1
Else S:= S-1/i;
Câu 10: Câu lệnh cho phép nhập giá tị của C từ bàn phím
a. Write(C);
b. Writeln(C);
c.Write('Nhap gia tri cua C');
d.Readln(C);
Part#1
A. 1 2 3 4 5 6 7 8 9 10