0,75*1024=768 байт. (т.к. 1 символ=1 байт) Ответ:768
29:2=14.1??? Что За пример такой с остатком????!
10101101101=2555 (в восьмеричной)
10101101101=56D (в шестнадцетиричной
Результат: ТМРРО
Const abc = 'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯА';
Var s : String;
Function Alg(ss : String) : String;
Var i : Integer;
Begin
If Odd(Length(ss)) then Insert(ss[(Length(ss) div 2)+1],ss,(Length(ss) div 2)+1) else ss:='С'+ss;
For i:=1 to Length(ss) do If Pos(ss[i],abc)>0 then ss[i]:=abc[Pos(ss[i],abc)+1];
Alg:=ss;
end;
Begin
{ Readln(s);
Writeln(Alg(s)); }
Writeln(Alg(Alg('КОМ')));
end.
12. графический редактор Gimp
офисный пакет OpenOffice
браузер Opera
4. хранить копию на DVD-диске
распространять измененную версию
исправлять явные ошибки