Как в памяти компьютера будут записаны числа +116 и -116?

116=1110100    

-116=0001011

116=1110100     -116=0001011

64*48*12*8=294,912- обьем в байтах 1 стр

var n, i, k, a: integer;

begin readln(n); k : = 0; for i : = 1 to n do begin readln(a); if trunc(sqrt(a)) * trunc(sqrt(a)) = a then k : = k + 1; end; writeln(k); end.