Разработатьпрограмму,моделирующуювыполнениеосновныхарифметическихопераций:умножениеиделениенадчислами,представленными в двоичной системе счисления.

Не знаю пойдет это тебе или нет.
--------------------------------------------
program calc;
var
operation:byte;
a,b:integer;
begin
writeln('Введите число');
read(a);
writeln('Введите число на которое хотите поделить/умножить');
read(b);
writeln('1 - разделить');
writeln('2 - умножить');
read(operation);
case operation of
1: writeln(a/b);
2: writeln(a*b);
end;
end.