Помогите найти ошибки в программе

 

 

 

Program Oshibka;
Var a:b;c:Integer;
Begin
Writeln('Введите число ',a);
Readln('a')
b=5
c:=ab;
Writeln('произведение a и b'равно',S);
Readln(a);
End

1.точку после Энда ставить нужноreadln(a);

readln(b);2.c:=a*b;

3.writeln('proizvedenie a i b ravno,c);4.Readln(c);