1 1112
2 2022112120
3 110131121
4 1221
for i := 0 to 10 do
А[i]:=i;
for i := 0 to 4 do
begin
К := A[t];
A[i] := A[10 * i] * K;
A[10 * i] := K;
<span>end;</span>
запишем условие: N=64, K=20, I=?
решение: найдем вес одного символа: 64=2^i, i=6 бит
I=K*i=20*6=120 бит
1)
Формула: S := a*a*sqrt(3)/4;
2)
read(a);
b:=a*a;
a:=b*b*b;
3) if a mod 2=0 then writeln('chetnoye') else writeln('nechetnoye);
if a<0 then wtiteln('polozhitelnoye) else writeln('otrizatelnoe');