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=3 và y=3 thì giá trị của F là:
A. 13
B. 6
C. 4
D. 0
Đáp án đúng : B
Cho đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF i mod 2 = 0 THEN T := T + 1 ;
Sau khi thực hiện, T có giá trị?
Hãy viết các biểu thức toán học sau sang dạng tương ứng trong Pascal:
Cho đoạn chương trình sau:
T := 0 ; i:=1;
WHILE i <= 10 DO
BEGIN
IF i mod 2 = 1 THEN T := T + i ;
i:=i+1;
END;
Sau khi thực hiện, T có giá trị?
Để viết chương trình giải phương trình bậc nhất có dạng: ax + b = 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:
Xét khai báo biến sau:
Var x, y, z : real;
c, d : boolean;
i, j : word;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
Biểu diễn nào dưới đây không phải là biểu diễn hằng trong Pascal:
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 ?
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 = ‘);
writeln(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.
Cho đoạn chương trình sau:
S := 0 ;
FOR i := 1 to 10 DO
IF (i mod 3=0) or (i mod 5=0) THEN S := S + i ;
Sau khi thực hiện, S có giá trị?
Cho đoạn chương trình sau:
IF <điều kiện> THEN write(x,’la so am’) ELSE write(x,’la so duong’);
Điều kiện là biểu thức logic nào dưới đây?
Viết chương trình tính tổng các giá trị lẻ trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Xét biểu thức sau (3*x <=15) and (x <=4). Biểu thức cho kết quả FALSE khi: