Câu 1
Trong Pascal, khai báo nào sau đây đúng:
Đáp án và lời giải
Đáp án: C
4/23 câu đang cập nhật đáp án (ghi rõ ở từng câu), chưa tính điểm; điểm tính trên 19 câu còn lại.
Trong Pascal, khai báo nào sau đây đúng:
Đáp án: C
Trong Pascal, các đoạn chú thích được đặt giữa cặp dấu nào ?
Đáp án: A
Chọn biểu diễn tên sai trong các biểu diễn dưới đây:
Đáp án: D
Biểu diễn nào dưới đây không phải là biểu diễn hằng trong Pascal:
Đáp án: D
Để viết chương trình giải phương trình bậc hai có dạng: ax2 + bx + c=0 (a#0), em cần phải thực hiện lệnh nhập vào từ bàn phím các biến nào sau đây:
Đáp án: B
Xét khai báo biến sau:
Var x, y, z : real;
c : char;
i, j : word;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
Đáp án: D
Xét biểu thức sau (3*x <=15) or (x <=4). Biểu thức cho kết quả TRUE khi:
Đáp án: C
Cho khai báo biến sau đây:
Var m, n : integer ;
x, y : real ;
Lệnh gán nào sau đây là sai?
Đáp án: A
Biểu thức Pascal: b/sqrt(sqr(a)+sqrt(b)) được biểu diễn trong toán học là:
Đáp án: C
Biểu thức 5*b + a mod 4*3 với a =12, b = 4 có giá trị là:
Đáp án: A
Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng đủ là:
Đáp án: C
Trong Pascal, câu lệnh ghép có dạng:
Câu này chưa tính điểm. Đáp án sẽ được cập nhật sớm.
Cho đoạn chương trình sau:
IF <điều kiện> THEN write(x,’la so le’) ELSE write(x,’la so chan’);
Điều kiện là biểu thức logic nào dưới đây?
Đáp án: B
Cho đoạn chương trình sau:
readln(x,y);
IF x > y THEN F:= 2*x – y ELSE
IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;
Nếu nhập vào từ bàn phím x=2 và y=3 thì giá trị của F là:
Đáp án: A
Cho đoạn chương trình sau:
S := 0 ;
FOR i := 1 to 10 DO
IF i mod 2 = 1 THEN S := S + 1 ;
Sau khi thực hiện, S có giá trị?
Đáp án: B
Cho đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF (i mod 3=0) and (i mod 5=0) THEN T := T + i ;
Sau khi thực hiện, T có giá trị?
Đáp án: A
Đáp án: B
Cú pháp khai báo trực tiếp biến mảng một chiều có dạng:
Đáp án: A
Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.
Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
D:=0;
FOR i:=1 to 5 DO
IF a[i] mod 2 = 1 THEN D:=D+1;
writeln(‘D = ’,D);
Đáp án: D
Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh?
Đáp án: B
Hãy viết các biểu thức toán học sau sang dạng tương ứng trong Pascal:

Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.
a) sqrt(2*sqr(x) + abs(x))
b) (-1/2 <=cos(x)) and (cos(x)<=1/2)
Cho chương trình Pascal sau:
Program chuvi_duongtron:
uses crt;
const pi = 3,14;
var cv, r: real;
Begin
clrscr;
write(nhap ban kinh r = );
readln(r);
cv:= 2*pi*r;
writeln(‘chu vi duong tron la: ‘,cv:10:2, ‘ m’);
readln
Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.
Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.
a) Program chuvi_duongtron;
b) const pi = 3.14;
c) write(‘nhap ban kinh r = ‘);
d) Thiếu End.
Viết chương trình tính tổng các giá trị là bội của 3 trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Lời giải của đề gốc để bạn tự đối chiếu; câu tự luận không tính điểm.
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 3 = 0 then Tong:=Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.