program First;
var a,b,c,i,j,k,aa,bb,cc,dd:integer;
begin
a:=1;
b:=2;
a:=a+b;          { a is 3}
b:=a-b;           { b is 3-2 , so b is 1}
a:=a-b;           { a is 3-1 , so a is 2}
writeln(a,b);  { This will output 21}
c:=(a+b)*b;
aa:=c*a;
bb:=aa+c;
cc:=bb-aa;
dd:=aa*bb*cc;
writeln(dd); {Output 162}
c:=c*c;
c:=c*c;
writeln(c); {Output 81}
end.