Câu hỏi:

Cho chương trình Pascal sau:

Program dientich_duongtron;

uses= crt;

const pi = 3.14;

var: dt, r: real;

clrscr;

write(‘nhap ban kinh r = ‘);

readln(r);

dt = pi*sqr(r);

writeln(‘dien tich duong tron la: ‘,dt:10:2, ‘ m’);

readln

End.

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âu lệnh ghép được thực hiện khi sau then hoặc else:

Xét khai báo biến sau:

Var x, y, z : real;

c : char;

    i, j : integer;

Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?

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:

S:=0;

FOR i:=1 to 5 DO

IF a[i] mod 2 = 0 THEN S:=S+a[i];

writeln(‘S = ’,S);

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:

IF <điều kiện> THEN write(x,’la so duong’) ELSE write(x,’la so am’);

Điều kiện là biểu thức logic nào dưới đây?

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=2 thì giá trị của F là: