Tìm và sửa lỗi sai trong pascal này

tìm và sửa lỗi sai trn pascal này :
program Tinh_Toan
Uses crt ;
var a, b :=integer
       c:=real
begin             ----->
Writeln('Nhap vao so a va b ')
Realdn(a,b)
c=a+b/2
Writeln('Kat qua bang',c)
end