Помогите решить задачу по информатике (паскаль)

В магазине купили a кг конфет по b руб. за килограмм и c кг печенья по d руб., за килограмм. Вычислите сумму покупки

Var a, b, c, d, e, f, g:integer;

beginwriteln ('введите вес купленных конфет') ;

read (a) ; writeln ('кг') ;

writeln ('введите стоимость купленных конфет') ;

readln (b) ;

writeln ('введите вес купленных печений') ;

read (c) ; writeln ('кг') ;

writeln ('введите цену купленных печений') ;

readln (d) ;

e:=a*b;

f:=c*d;

g:=+e+f;

writeln ('сумма ', g) ;

end.