1) Лицензионное ПО (стоит деньгу, но большинство такого ПО взламывается по мере выхода, хоть это и наказуемо)
2) Свободное ПО (ПО распространяемой бесплатно или условно бесплатно)
1-2048
2-2
3-0,0024
Сравнения
3 байта =24бита
1536битов<1,5килобайта(1,5кб=12288 бит)
Алгоритм в прикрепленном файле, для графического исполнителя "Стрелочка"
//PascalABC.NET 3.1 сборка 1200
begin
var s:=0.0;
var v := 0.0;
read(s,v);
writeln(2*s+v);
end.
Var a : Integer;
s : Set of Byte;
Begin
s:=[];
Readln(a);
Repeat
If (a mod 10) in s then Write(a mod 10:2) else Include(s,a mod 10);
a:=a div 10;
Until a=0;
Writeln;
end.