Ôn tập 1 khối 11

Xét đoạn chương trình sau:

For i := 1 to N do

            Begin

                        Write(‘Nhap phan tu thu’, i, ‘=’);

                        Readln(a[i]);

            End;

Đoạn chương trình trên xác định các phần tử của dãy số như thế nào?

• Nhập từ bàn phím

• Tạo ngẩu nhiên

• Nhập từ cách khác

• Không tạo ra dãy số

Xét đoạn chương trình sau:

KQ1 := a[1];

KQ2 :=1;

For i := 2 to N do

            If a[i] > KQ1 then

Begin

                                    KQ1 :=a[i];

                                    KQ2 := i;

                        End;

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Kết quả số lớn nhất nằm trong biến nào?

• KQ1

• KQ2

• i

• N

Xét đoạn chương trình sau:

B := 0;

C :=0;

For i := 1 to N do

            If a[i] > 0 then        

Begin

                                    B :=B + a[i];

                                    C :=C + 1;

                        End;

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Số lượng phần tử dương trong dãy số A nằm trong biến nào?

• C

• B

• i

• N

Xét đoạn chương trình sau:

B := 0;

C :=0;

For i := 1 to N do

            If a[i] > 0 then        

Begin

                                    B :=B + a[i];

                                    C :=C + 1;

                        End;

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Tổng phần tử dương trong dãy số A nằm trong biến nào?

• B

• C

• N

• i

Xét đoạn chương trình sau:

KQ :=1;

For i := 1 to N do

            If a[i] mod 2 = 0 then         

                        KQ := KQ *a[i];

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Kết quả KQ là gì?

• Tích các số chẵn

• Tổng các số chẵn

• Tích các số không chia hết cho 2

• Tổng các số không chia hết cho 2

Xét đoạn chương trình sau:

KQ := 0;

For i := 1 to N do

            If a[i] < 0 then

                        KQ:= KQ + 1;         

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Kết quả KQ là gì?

• Đếm các số âm

• Tổng các số âm

• Tổng các số không âm

• Đếm các số không âm

Tạo ngẫu nhiên dãy số A ta sử dụng câu lệnh nào?

• A.    Randomize;

• Random;

• Randomize(a);

• Random(a);

Xét đoạn chương trình sau:

T := 0;

For i := 1 to N do

            If a[i] mod 2 = 1 then

                        T:= T + a[i];

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Kết quả T là gì?

• Tổng các số lẻ

• Tổng các số chia hết cho 2

• Tổng các số dư 1 và 2

• Tổng các số 2

Xét đoạn chương trình sau:

T := 0;

For i := 1 to N do

            If a[i] = 0  then

                        T:= T + 1;    

Nhập dãy số từ bàn phím. Sau khi thực hiện đoạn chương trình trên. Kết quả T là gì?

• Đếm các số 0 trong dãy số A

• Đếm các số 0 trong dãy số N

• Đếm các số 0 trong phần tử N

• Đếm các số 0 trong phần tử A

Đoạn chương trình nào tính tích các số chia hết cho 3 và 5 trong dãy A gồm N phần tử

• A.    For j := 1 to N do

                          If a[j] mod 3 = 0 and a[j] mod 5 = 0  then

                                      T:= T*a[j];  

• For i = 1 to N do

                          If a[i] mod 3= 0  and a[i] mod 5 = 0  then

                          T:=T*a[i];

• For j := 1 to N do;

                          If a[j] mod 3= 0  and a[j] mod 5 = 0  then

                          T:=T*a[i];

• For i := 1 to N do

                          If a mod 3= 0  and a mod 5 = 0  then

                          T:=T*a;