Что появится на экране после выполнения программы? program pr1;
uses crt;
var a,b: byte;
begin
a:=1;
b:=a*a;
a:=a+1;
b:=a*a;
writeln(‘a=’,a,’ b=’,b);
end.