Напишите, что и в какой последовательности будет выведено на экран в результате выполнения следующей программы (в точности нарисуйте, как это будет выглядеть на экране):

Var a:integer;

b:real;

begin

a:=2;

writeln(a);

b:=a*a+3*a;

write(′при а= ′,a,′, Ответ ′,b);

write(′ End′);

end.