Hãy liệt kê các lỗi có trong chương trình dưới đây và sửa lại cho đúng

Câu 1 hãy liệt kê các lỗi có trong chương trình dưới đây và sửa lại cho đúng
var a,b:=integer
Const c :=
Begin     a=200      b=a/c.    Write(b)
  Readln
End