Câu 1:

- Cho X  nhận các giá trị 5,10, 20, 30, 200.

- Y nhận các giá trị 3.5, 6.2, 7.0, 23.3

- Z nhận các giá trị 'A',  'B' ,  'a',  'O' .
- Viết câu lệnh khai báo X, Y, Z, K sao cho ít tốn bộ nhớ nhất :

=> Giá trị của X thuộc kiểu số nguyên nằm trong phạm vi từ 5 đến 200 => khai báo kiểu byte ít tốn bộ nhớ

=> Y thuộc kiểu số thực : có thể khai báo kiểu real (6 byte) hoặc extended (10 byte) => Chọn real ít tốn bộ nhớ hơn

=> Z thuộc kiểu kí tự : char (1 byte);

=> Khai báo : Var X : byte; Y : real; Z : char;

Câu 2 .

Sửa lỗi cú pháp cho trương trình trên nếu có :
Program  KT HK1; => tên có khoảng cách
Const Pl:= 3.14, => dư dấu hai chấm, sai dấu phẩy
Var r, S. real; => sai dấu chấm
Begin
      Writeln('Nhap r =') => thiếu chấm phẩy
      Readln(N); => nhập sai biến
      S:= Pl * sqr(r);
      Writeln(S = ' S:8.1); => thiếu dấu nháy đơn, dấu phẩy
End.

* Sửa :

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

Câu 1:

Dãy số X hoàn toàn là số nguyên nên là biến số nguyên.

Var X : integer;

Dãy số Y có số thực nên biến Y là biến số thực.

Var Y : real;

Dãy Z nhận các kí tự nên Z là biến xâu.

Var Z : string;

Câu 2:

Sửa lại:

Program KT_HK1;

Const Pl:= 3.14;

Var r, S: real;

Writeln('Nhap r =');

Writeln('S = ' ,S:8.1);