Первое сообщение
32=2 в степени 5 => 80*5=400 бит
Второе сообщение 64=2 в степени 6 => 70*6=420 бит
400 < 420.
Во втором сообщении информации больше
Sub z()
n = CInt(InputBox("N?"))
k = 1
s = 0
For i = 1 To n
k = k * i
s = s + k
Next
MsgBox (s)
End Sub
Алгоритм на Паскале:
var a,b,c,d,x:integer;
begin
readln(a,b);
с:=a*a;
d:=b*b;
abc(x)=abc(c-d);
writeln(abc(x));
end.
Вроде так.)
2^8=256=> 8 бит для 1 пикселя.
Далее 8*1024*768/8*1024=768
Ответ:768