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 ;

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ị?

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?

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à:

Biểu diễn nào dưới đây không phải là biểu diễn hằng trong Pascal:

Trong Pascal, khai báo nào sau đây đúng:

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 đ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 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.

Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng đủ là:

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?

Biểu thức 5*b + a mod 4*3 với a =16, b = 3 có giá trị là:

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: