Câu 40:  Hãy cho biết các  khai báo được đánh số sau đây , khai báo nào là sai ?

1. Const a=1;

2. Const  MaxData  = 1024 * 64 - 16;

3. Const NumChars = Ord('Z') - Ord('A') + 1;

4. Const  Message  = Hello Pascal; 

a.  1.

b.  2.

c.  3.

d.  4.

Câu 41: Cho biết  chương trình sau in ra gì trong các phương án cho dưới đây?

Var st : string;  i, dd : integer;

Begin

st :='So Buu chinh Vien thong' dd:=Length(st); 

For i := 1 to dd do

if (st[i] >= 'a') and (st[i] <= 'z') then st[i]:= Upcase (st[i]);

   Write (st);

End. 

a.  SO BUU CHINH VIEN THONG.

b.  so buu chinh vien thong.

c.  So Buu Chinh Vien Thong.

d. So buu chinh VIEN THONG.

Câu 42: Cho biết khi thực hiện đoạn lệnh sau ‘’songay’’ bằng bao nhiêu(biết  nam=2002 thang=2) trong các phương án cho dưới đây?

begin

Write(nhap thang:’);Readln(thang);

   Write('Cho biet nam : ');   Readln(nam);

      Case thang Of

       1,3,5,7,8,10,12: songay:=31;

      4,6,9,11 : songay:=30;

      2    :Case nam Mod 4 Of

               1,2,3 :songay:=28;

                    0      :songay:=29;

          End;

  End.

a. 28.

b. 29.

c. 2.

d. 0.

Câu 43:   Cho biết khi thực hiện đoạn lệnh sau kết quả s bằng bao nhiêu với n=4 trong các phương án cho dưới đây?

Var n, i , s:integer;

Begin

   Clrscr;

   Write('Nhap vao gia tri cua n :'); Readln(n);

   s:=2;

   For i:=1 to n do s:=s+1;

End;

a. 6.

b. 8.

c. 10.

d. 12.

Câu 44: Kết quả  khi thực hiện  đoạn mã sau bằng bao nhiêu trong các phương cho dưới đây ?

s:=0

For i:=1 To 2 Do

     For j:=1 to 3 Do

Begin

s:=s*i*j;

Writeln('s=',s);

End

a. 120.

b. 625.

c. 0.

d. 112.

Câu 45: Hãy cho biết kết quả đoạn mã sau bằng bao nhiêu trong các phương án cho dưới đây ?

Var

a,b,s:Real;

Begin

a:=9;

b:=34;

s:= sqrt(b-a);

Writeln ('s = ', s);

End.

a. 3.

b. 0.

c. 5.

d. 100.

Câu 46: Hãy cho biết  chương trình đệ quy sau khi n=3 thì  factorial bằng bao nhiêu trong các phương án sau đây?

Function  Factorial(N:integer):Longint;

Begin

If N=0 Then  Factorial:=1

  Else    Factorial:=N* Factorial(N-1);

End;

a. 3.

b. 0.

c. 6.

d. 10.

Câu 47: Hãy cho biết kết quả của đoạn  mã sau bằng bao nhiêu trong các phương án dưới đây ?

s:=0;

For i=1 To 2 Do

    For j =1 to 2 Do

s:=s+i*0;

Writeln('S=',s);

a. 12.

b. 0.

c. 15.

d.10.

Câu 48: Hãy cho biết kết quả a,b,c  của chương trình sau  bằng bao nhiêu trong các phương án cho dưới đây?

Var a,b,c:integer;

Procedure tt(  a:integer; var b,c:integer);

Begin

a:=a+1; b:=b+1; c:=a+b;

End;

Begin

a:=1;b:=1;

tt(a,b,c);

Write(‘a=’,a,’b=’,b,’c=’,c);

Readln;

End.

a. a=2 b=2 c=4.

b. a=1 b=1 c=2.

c. a=1 b= 2c=4.

d. a=1 b=2 c=0.

Câu 49: Muốn xoá tệp có tên ‘LyLich.Dat’   trên đĩa (được đặc trưng qua biến F ) ta viết như thế nào trong các cách viết cho dưới đây ?

a. Assign(F,  'LyLich.dat');remove(F);

b. Assign(F,  'LyLich.dat');del(F);

c. Assign(F,  'LyLich.dat');delete(F);

d. Assign(F,  'LyLich.dat');erase(F);

Câu 50: Hãy cho biết đoạn chương trình sau khi n=4 thì s bằng bao nhiêu trong các phương án dưới đây?

 Var n,i, s:integer;

Begin

   Clrscr;

   Write('Nhap vao gia tri cua n :'); Readln(n);

   S:=0;

   For i:=1 to n do s:=s*i;

End;

a. 10.

b. 0.

c. 11.

d. 12.

Câu 51:Hãy cho biết đoạn chương trình sau giải quyết bài toán gì trong các phương án cho dưới đây?

M:=A[1];

For i:=2 To N Do

       If M>A[i] Then M:=A[i];

a. Tìm phần tử lớn nhất của mảng N phần tử.

b. Sắp xếp N phần tử của mảng giảm dần.

c. Sắp xếp N phần tử của mảng tăng dần.

d. Tìm phần tử nhỏ nhất của mảng N phần tử.

Câu 52: Hãy cho biết đoạn chương trình sau giải quyết bài toán gì trong các phương án cho dưới đây?

M:=A[1];

For i:=2 To N Do

       If M<A[i] Then M:=A[i];

a. Tìm phần tử lớn nhất của mảng N phần tử.

b. Sắp xếp N phần tử của mảng giảm dần.

c. Sắp xếp N phần tử của mảng tăng dần.

d. Tìm phần tử nhỏ nhất của mảng N phần tử.

Câu 9: Khẳng định nào sau đây là sai?

A.  là một hỗn số dương                   B.  Phân số  bằng phân số 

C.                               D. Phân số  biểu thị thương của phép chia 10 cho 4

Câu 10:  Khẳng định nào sau đây là sai?

A.  là một phân số

B. Mọi số nguyên đều viết được dưới dạng phân số

C. Mỗi phân số khác 0 luôn có phân số nghịch đảo

D. Phân số   bằng phân số  nếu a . d = b . c

Câu 11:  Các khẳng định nào sau đây là đúng?

A. Phân số tối giản là phân số mà tử số và mẫu số chỉ có ước chung là 1 và −1

B. Phân số tối giản là phân số mà tử số và mẫu số chỉ có ước chung là 1

C. Phân số tối giản là phân số mà tử số và mẫu số chỉ có ước chung là −1

D. Mọi phân số đều rút gọn được về phân số tối giản

Câu 12:  Khẳng định nào sau đây là sai?

A. Phân số  bằng phân số  với m là số nguyên khác 0

B. Phân số  bằng phân số  với m là một ước chung của a, b

C. Phân số  bằng phân số 

D. Mọi phân số có mẫu âm đều viết được dưới dạng phân số bằng nó có mẫu dương

Câu 9: Khẳng định nào sau đây là sai?

A.  là một hỗn số dương                        B.  Phân số  bằng phân số 

C.                                     D. Phân số  biểu thị thương của phép chia 10 cho 4

Câu 10:  Khẳng định nào sau đây là sai?

A.  là một phân số

B. Mọi số nguyên đều viết được dưới dạng phân số

C. Mỗi phân số khác 0 luôn có phân số nghịch đảo

D. Phân số   bằng phân số  nếu a . d = b . c

Xét các mệnh đề sau:

I . ( − 4 ) ⋅ ( − 25 ) = − 4 ⋅ − 25 I I . ( − 4 ) ⋅ ( − 25 ) = 100 I I I . 100 = 10 IV ⋅ 100 = ± 10

Những mệnh đề nào là sai?

Hãy chọn câu trả lời đúng trong các câu A, B, C, D dưới đây:

A. Chỉ có mệnh đề I sai;

B. Chỉ có mệnh đề II sai;

C. Các mệnh đề I và IV sai;

D. Không có mệnh đề nào sai.