Подскажите где ставить двоеточие или ровно если а:=string
If a='хлеб' then a=5

a:= string - неправильная запись, равно не нужно,
а при присваивании переменной "а "значения 5 не хватает двоеточия. В общем запись будет вот такая:
a:string;
if a='хлеб' then a:=5;
Но в программе нельзя использовать данную схему, потому что 
переменной а типа string не может быть присвоено целочисленное значение