a) tìm lỗi

dòng 1:  lệnh var phải có dấu :

dòng 2: sau begin dư dấu :

dòng 3: thiếu 1 dấu ' trước chữ Chuong

dòng 5: thiếu dấu ; ở cuối câu lệnh

dòng 6: lệnh gán thiếu dấu =

dòng 7: sau dấu = phải có dấu '

b) kết quả: in ra màn hình kết quả của phép trừ so1(400) cho so2(350)

- Dòng 1 :

+ Sai cú pháp khai báo biến

+ Sửa : Var so1, so2, tong : integer;

- Dòng 2 :

+ Từ khoá bắt đầu phần thân chương trình dư dấu chấm phẩy

+ Sửa : Begin

- Dòng 3 :

+ Xâu được in ra không nằm trong dấu nháy kép

+ Sửa : Writeln('Chuong trinh thuc hien phep tru so hoc');

- Dòng 5 :

+ Sai cú pháp câu lệnh gán

+ Sửa : so2 := 350;

- Dòng 6 :

+ Sai cú pháp câu lệnh gán

+ Sửa : tong := so1 - so2;

- Dòng 7 :

+ Xâu được in ra không đặt trong dấu nháy đơn

+ Sửa : Writeln('ket qua = ', tong : 5);