Запусти Паскаль и введи программу: program x1;
var
a,b,c:integer;
begin
a:=−33;
b:=abs(a);
writeln('abs(−33)=',b);
c:=sqr(b);
writeln('sqr(b)=',c);
c:=sqr(b+b);
writeln('sqr(b+b)=',c);
end.
При запуске программы вывод на экран:
abs(−33)=
sqr(b)=
sqr(b+b)=
ответ смотри вложение
abs- модуль числа
sqr- квадрат числа