Исправить все ошибки допущенные в программе
Program Task_1_11;
Var a; b; c; Integer;
Begin
Writeln (' Введите число ' , a) ;
Readln(a)
b = 5;
c:= ab;
Writeln (' произведение ' a и b ' равно ' , 5);
Readln (a);
End.