Помогите решить задачу по информатике ( паскаль) В магазине купили 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.