Các lỗi trong bài:
Var a,b:= integer; {Khai báo Var không có lệnh gán. Do đó sau tên biến chỉ có ":" sau kiểu dữ liệu}
Const c:=300; {Chỉ có dấu "=" vì đây là const chứ không phải là khai báo}
Begin
a:=100;
b:=c/a; {Do b khai báo thuộc kiểu integer, không phải real. Mà phép gán b sẽ cho ra kết quả thuộc real}
Writeln(b) {Không có ";" sau câu lệnh}
End.
Sửa lại:
Var a,b : integer;
Const c=300;
Begin
a:=100;
Writeln('Gtri B luc nay= ',c/a);
End.
Hoặc:
Var a : integer; b:real;
Const c=300;
Begin
a:=100;
b:=c/a;
Writeln('Gtri B luc nay= ', b);
End.
* Trước "end." có thể có readln hoặc không cũng không sao nhé! Vì chúng chỉ cho phép dừng kết quả lại!
