Запусти Паскаль и введи программу:

var
a,b,c:integer;
begin
a:=−43;
b:=abs(a);
writeln('abs(−43)=',b);
c:=sqr(b);
writeln('sqr(b)=',c);
c:=sqr(b+b);
writeln('sqr(b+b)=',c);
end.

При запуске программы вывод на экран:
abs(−43)=
sqr(b)=
sqr(b+b)=

abs(−43)=43                                                                                                                                          

sqr(b)=1849                                                                                                                                          

sqr(b+b)=7396