Возможно тупой вопрос

[Irat]

Прошу меня извенить если вы посчитаете этот вопрос тупым.
Подскажите если знать последовательность 1 и 0 можно ли создать например ехе?

[KingOfNothing]

хех, можно

[Irat]

Ты поразил меня своими знаниями.
А как это реализовать? С помощью чего?

[KingOfNothing]

если ты знаешь точную последовательность бит, которая является .exe файлом, то нужно просто скопировать её в файл с расширением .exe, если у тебя нет последовательности битов, то компилятор (свой или чужой) поможет тебе её создать, записав её .exe файл.

[XeN0N]

Ничего. Не бывает глупых вопросов, бывают глупые люди © Mr. Garrison
=)

[Irat]

Сообщение от KingOfNothing

если ты знаешь точную последовательность бит, которая является .exe файлом, то нужно просто скопировать её в файл с расширением .exe, если у тебя нет последовательности битов, то компилятор (свой или чужой) поможет тебе её создать, записав её .exe файл.

А как это сделать?

[KORN]

конечно это тупой вопрос, за такие тупые вопросы банят т.к. люди создающие такие тупые темы не умею их нормально называть...

компьютер воспринимает все в 2ичной системе... а как работали программы написанные на перфокарте?

[Irat]

А как это сделать для windows?

[KingOfNothing]

с помощью функций для работы с файлами, для си, например, fwrite и fread

[Serge_Bliznykov]

Сообщение от Irat

А как это сделать?

Как сделать что?!?!?

создать бинарный файл, имея правильный набор 1 и 0 -ков?! У Вас он есть такое набор?!
Если да - тогда можно так :D :

type Str8 = string[8];
Const MyExeBuf : array[1..96] of Str8 = (
'01001101','01011010','01100000','00000000','00000001','00000000',
'00000000','00000000','00000010','00000000','10000100','00000000','10000100',
'00000000','00000011','00000000','00010000','00001000','00000000','00000000',
'00000000','00000000','00000000','00000000','00011100','00000000','00000000',
'00000000','00000000','00000000','00000000','00000000','11111100','00010110',
'00000111','00010110','00011111','11101000','00000100','00000000','10110100',
'01001100','11001101','00100001','10111000','00000000','00000000','10111011',
'00000111','00000000','01010110','10010110','10110100','00001110','10101100',
'00111100','00000000','01110100','00000100','11001101','00010000','11101011',
'11110101','01011110','11101000','00000001','00000000','11000011','10110100',
'00001000','11001101','00100001','11000011','10010000','10010000','10010000',
'10010000','10010000','10010000','10010000','01001000','01100101','01101100',
'01101100','01101111','00101100','00100000','01010111','01101111','01110010',
'01101100','01100100','00100001','00001101','00001010','00000000');

function BinStr2Byte( s : Str8 ) : byte;
var j, k : integer;
  Res : byte;
begin
  Res := 0;
  k := 1;
  for j:=8 downto 1 do begin
    if s[j]='1' then Res := Res + k;
    k := k Shl 1;
  end;
  BinStr2Byte := Res;
end;

var f1 : file;
  Buf : array[1..96] of byte;
  i, iWritten : integer;
begin
  Assign(f1, 'HelWrld.exe');
  Rewrite(f1,1);
  for i:=1 to sizeOf(Buf) do
    Buf[i] := BinStr2Byte( MyExeBuf[i] );
  BlockWrite(f1, Buf, sizeOf(Buf), iWritten);
  Close(f1);
  WriteLn('Файл HelWrld.exe создан.')
end.