begin
int a;
procedure incr(a);
int a;
begin
a:=a+1;
end;
a:=0;
begin
integer b;
procedure decr(a);
int a;
begin
a:=a-1;
end;
b:=x;
decr(b);
decr(a);
end;
incr(a);
end.

A quantidade de blocos existentes no trecho de código acima apresentado é igual a