Что выйдет на экране в результате выполнения a=("информация") print (a[1]+a[3:5]+a[-1])

Бит - это минимальная единица измерения информации.
В 16-ричном коде это выглядит так:
C1 E8 F2 20 2D 20 FD F2 EE 20 EC E8 ED E8 EC E0
EB FC ED E0 FF 20 E5 E4 E8 ED E8 F6 E0 20 E8 E7
EC E5 F0 E5 ED E8 FF 20 E8 ED F4 EE F0 EC E0 F6
E8 E8 2E
Если применить к каждому байту функцию XOR 55 (исключающее или с числом 55),
то получится
94 BD A7 75 78 75 A8 A7 BB 75 B9 BD B8 BD B9 B5
BE A9 B8 B5 AA 75 B0 B1 BD B8 BD A3 B5 75 BD B2
B9 B0 A5 B0 B8 BD AA 75 BD B8 A1 BB A5 B9 B5 A3
BD BD 7B
Самое интересное в этом коде то, что применив к нему снова XOR 55, мы получим исходное сообщение.

Добрый день! К сожалению я не работаю с C++, но если это то вот эта задача в Pascal
VAR a,b,c,d:REAL;
PROCEDURE Print_S(x,y,z:REAL);
 VAR  p,S:REAL;
 begin  If ((x+y)>z) and ((x+z)>y) and ((y+z)>x) then 
 begin   
p:=x+y+z;
S:=SQRT(p*(p-x)*(p-y)*(p-z));
WriteLn('S= ',S);
end
 else
Writeln('Треугольник не существует!');
end;
BEGIN Write('a= ');
ReadLn(a);
 Write('b= ');
 ReadLn(b);
 Write('c= ');
 ReadLn(c);
 Write('d= ');
 ReadLn(d);
 WriteLn;
 WriteLn('Стороны ',a,'; ',b,'; ',c);
 Print_S(a,b,c);
 WriteLn;
 WriteLn('Стороны ',a,'; ',b,'; ',d);
 Print_S(a,b,d);
 WriteLn;
 WriteLn('Стороны ',a,'; ',c,'; ',d); 
Print_S(a,c,d);
 WriteLn;
 WriteLn('Стороны ',b,'; ',c,'; ',d);
 Print_S(b,c,d);
END.