Где ошибка?

Pascal abc не выдаёт ответ!!!

Как сделать через div

Пожалуйста помогите!))


Program p_1;

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

Begin

a:=5;

b:=3;

c:=6;

d:=12;

e:=((a+b)*c/d)^2;

Writeln (e);

End.