помагите а то училка два поставит

(63+12): 3=25

(39-18)*4=84

750-12: 3=746

420+9*6=474

read(n);

s = str(n);

n1 : = int(s[1]);

n2 : = int(s[2]);

n3 : = int(s[3]);

if (n1+n2+n3) mod 2 = 0 then writeln("сумма чисел четная")

var temp: array[1..31] of integer; k,i: integer;

beginfor i: =1 to 31 do readln(temp[i]);

for i: =1 to 31 do 

if a[i]< 0 then inc(k);

writeln(k);

end.

n=2 в степени i

64=2 в 6 степени

ответ: 6 бит