C2:

a. a:Array [1..11] of integer;  (sai)

sửa lại: Var a:Array [1..11] of integer;

b. Var a:Array [10.5..25.5] of  real; (sai)

sửa lại: Var a:Array [10..25] of real;

c. var a:Array [1,11] of integer;  (sai)

sửa lại: var a:Array [1..11] of integer;

d. Var a:Array [5..25] of  real; (đúng)

e. Var a:Array [10..25.5] of  real; (sai)

sửa lại: Var a:Array [10..25] of  real; 

f. Var  N: real; a:Array [1..N] of  real; (sai)

sửa lại: const n=10;
            Var  a:Array [1..N] of real;

C3:

B1: Nhập dãy số;

B2: max ← A[1]; min ← A[1];

B3: i←i+1;

B4: Nếu A[i]>max thì max ← A[i];

      Nếu A[i]<min thì min ← A[i];

B5: Nếu i<=n thì quay lại B3;

B6: Thông báo kết quả và kết thúc thuật toán;