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