program d1;
var x,v,b,n,d,q:integer
begin
x:=A*A;
v:=x*x*A;
b:=v*v*v*x;
writeln(x);
writeln(v);
writeln(b);
end.
1) 32 это 2 в пятой степени ответ 5
2) 4*5=20 бит 5*6=30 бит ответ второе
1) H=D+F+G+E
E=C=1
C=1
G=E=1
F=E+C+1+B=1+1+1+1=4
B=1
D=F+B=5
H=5+4+1+1=11
Ответ: 11
2) Решается подобным образом
Ответ: 10
(могу расписать)
K=64*64=4096 пикс
N=4;
N=2^i; 4=2^2 => i=2 бит на пикс
I=k*i=4096*2=8192 бит
Ответ: 8192 бит
Var
a:integer;
begin
writeln('a ?');
readln(a);
if (a mod 10)=(a div 100) then
writeln('Yes')
else
writeln('N');
end.