vara, i, j: real;
begina := (2 - Abs(j-3) Abs(j-3) Abs(j-3)) (i + j) (i + j) (i + j) (i + j) (i + j) Log10(abs(j-i)) - (Abs(5.3 - Exp(2j))) power(-2, j);end.
var
a, i, j: real;
begin
a := (2 - Abs(j-3) Abs(j-3) Abs(j-3)) (i + j) (i + j) (i + j) (i + j) (i + j) Log10(abs(j-i)) - (Abs(5.3 - Exp(2j))) power(-2, j);
end.