Question

10.  Hãy tìm lỗi sai và sửa lại cho đúng.

Uses crt;

Program cau1;

Var  toan ; van; tbc ; anh ,  interger ;

Clrscr  ;

begin

writeln(‘nhap vao diem toan:’) ;   readln(toan)

writeln(‘nhap vao so diem van: ‘) ; readln(van)

writeln(‘nhap vao so diem anh: ‘) ; readln(anh)

 tbc:=(van+toan+anh)/3;

writeln(‘diem trung binh la: ‘, tbc);

readln

end.

Answer 1

* Program cau 1 phải trước uses crt;

Var toan; van; tbc; anh, interger; ( Sai )

=> Var toan, van, tbc, anh: integer;

* Begin phải trước lệnh clrscr;

 

Answer 2

Bổ sung thêm nhé!

Sau lệnh readln ( toan ) phải có dấu; 

=> readln ( toan );

Tương tự các lệnh readln ( van ) => readln ( van );

_______________ readln ( anh ) => readln ( anh );