Câu 29:

a) Var x: byte;

          y: real;

b) Với khai báo trên, máy tính sẽ cấp bộ nhớ là 7 byte (kiểu byte: 1 byte, kiểu real: 6 byte (xem thêm trong bảng sgk 11 trang 21)).

Câu 31: 

Sửa: (dòng nào tớ đánh dấu (*) thì sửa lại y chang chỗ mà tớ đã in đậm lên trong dòng đó, thì chương trình sẽ chạy).

Program Kiem_tra1tiet;   (*)

Const PI=3.14;  (*)

Var r, S: real;

Begin

Writeln ('Nhap r=');   (*)

Readln (r);    (*)

S:= PI*sqr(r);

Writeln ('S=', S:8:1);   (*)

Readln;

End.

Câu 29:

a. Var x: byte;
      y: real;

b. 7 byte (byte: 1 byte; real: 6 byte)

Câu 30:

- Dòng 1: Không có dấu cách trong tên

- Dòng 2: Sử dụng dấu bằng trong khai báo hằng

- Dòng 5: Thiếu dấu ";" cuối câu

- Dòng 6: Không có biến N, thay vào đó là R

- Dòng 8: Thiếu dấu "," 

*Sửa chương trình:

Program KiemTra1Tiet;
Const pi=3.14;
Var r, S: real;
Begin
         Writeln('Nhap r = '); 
         readln(r);
         S:=pi*sqr(r);
         Writeln('S = ',S:8:1);
Readln;
End.