LÝ THUYẾT:

1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây:

A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30

2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng

A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'')

C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi

3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết:

A. Max:=b;If a> Max then Max:=a; B. If (a>b) then Max:=a;If (b>a) then Max:=b;

C. Max:=a;If b>Max then Max:=b; D. Cả 3 câu đều đúng

4) Lệnh nào thể hiện A là số chẵn:

A. If A mod 2 <> 1 then write (' A là số lẻ ');

B. If A mod 2 <> 0 then write (' A là số chẵn ');

C. If A mod 2 = 0 then write (' A là số chẵn ');

D. If A mod 2 = 1 then write (' A là số chẵn ');

5) Chương trình sau cho biết kết quả là gì?

Var a, b: real; x integer; Begin readln(a, b); If a > b then x:=a else x:=b; Write(x); End.

A. Đảo giá trị của 2 biến a, b cho nhau

B. Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu

C. Xuất ra màn hình số lớn trong 2 số a, b đã nhập

D. Xuất ra màn hình số nhỏ trong 2 số a, b đã nhập

6) Điều kiện nào hợp lệ trong các điều kiện sau khi nói về ngày trong tháng 8:

A. (NGAY > 0) AND (NGAY <= 31) B. (NGAY > 0) AND (NGAY <= 30)

C. NGAY <= 31 D. NGAY > 0

7) Để thể hiện điều kiện D lớn hơn hay bằng 8 và E là Gioi câu nào sau đây đúng:

A. D >= 8 AND E= Gioi B. (D >= 8) AND (E= Gioi)

C. (D >= 8) AND (E= "Gioi") D. (D >= 8) AND (E= 'Gioi')

8) Xác định học sinh thi đậu hay rớt bằng câu lệnh nào sau đây:

A. If ĐTB >= 0 then Writeln('Thi đậu');

B. If ĐTB >= 0 then Writeln('Thi rớt');

C. If ĐTB >= 5 then Writeln('Thi đậu') else Writeln('Thi rớt');

D. If X mod 2=0 then Writeln('Thi rớt') else Writeln('Thi đậu');

9) Tìm số bé nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

A. min:=x; If y>min then min:=y else min:=z;

B. min:=x; If y>min then min:=y; if z>min then min:=z;

C. min:=x; If y<min then min:=y else min:=z;

D. min:=x; If y<min then min:=y; if z<min then min:=z;

10) Để thể hiện B lớn hơn 10 câu nào sau đây đúng:

A. B >= '10' B. B>= '10' C. B > 10 D. B >= 10

1. Các câu lệnh Pascal sau đây được viết đúng hay sai?

A. if x:=5 the a=b;

B. if x > 4; then a:=b;

C. if x > 4 then a:=b; m:=n;

D. if x > 4 then a:=b; else m:=n;

2. Để 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 a>Max then Max:=a;

D. Cả 3 câu đều đúng

3. If.. Then...Else là:

A. Vòng lặp xác định

B. Vòng lặp không xác định

C. Câu lệnh điều kiện

D. Một khai báo

4. If a>8 then b:=3 else b:=5; Khi a nhận giá trị là 0 thì b nhận giá trị nào?

A. 0

B. 5

C. 8

D. 3

5. Phần dư trong phép chia của hai số nguyên 16 và 5 là:

A. 16 div 5 = 1

B. 16 mod 5=1

C. 16 div 5=3

D. 16 mod 5=3

6. A được khai báo là biến có kiểu dữ liệu số nguyên, X là biến dữ liệu kiểu xấu. Phép gán hợp lệ:

A. A:=4.5;

B. X:='1234'

C. X:=57;

D. A:='LamDong'

Câu 1:

a)  Với mỗi câu lệnh sau đây giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x bằng 7?

if (75 mod 5) = 0 then x := x + 1;

if x > 10 then x := x + 1 else x := x - 1;

b) Câu lệnh Pascal sau đây có hợp lệ không? Giải thích.

If x > y then max: = x; else max: = y

Câu 2:

Viết chương trình sử dụng lệnh lặp FOR để tính tổng các số tự nhiên từ 1 đến 10

Câu 3:

Viết chương trình sử dụng lệnh lặp While – Do  để tính tổng các số tự nhiên từ 1 đến 10