Ответ:
Вместо присваивания a := 5 программа считывает значение a с клавиатуры. Остальные вычисления выполняются в том же порядке, что и в задании №7.
program Hello;
var
a, b: integer;
begin
readln(a);
b := a + 2;
a := (a + 2) * (b - 3);
writeln('a=', a, ', b=', b);
end.