pascal abc
var
a,c,d: real;
b:char;
begin
.....
if b='+' then
d:=a+b;
.....

выдает ошибку "нельзя преобразовать тип string к real"

что делать?