Question

program summer;
.
var a, b: integer;
begin
a := 20;
b:= 3;
b:= a/2*b;
TE
a := 2*a + 3*b;
write (a);
end. Решите пожалуйста ​