Ужени было 111011 в двоичной яблок. он отдал 11100 в двоичной яблок василию и сам съел 110 в двоичной яблок . сколько осталось яблок у жени? подробное решение

Задача простая, нужно только знание теории. http://inf1.info/arithmetic

1. Сколько яблок было у Жени?
111011₂ = 2⁵+2⁴+2³+2¹+2⁰ = 32+16+8+2+1 = 59₁₀
2. Сколько яблок Женя отдал Василию ?
11100₂ = 2⁴+2³+2² = 16+8+4 = 28₁₀
3. Сколько яблок Женя съел?
110₂ = 2²+2¹ = 4+2 = 6₁₀
4. Сколько яблок осталось у Жени?
59-28-6 = 25

ответ: 25 яблок.

IDLE в Windows находится в меню "Пуск" -> "Python 3.x" -> "IDLE". Также можно быстро найти его через "Поиск" около меню "Пуск", набрав в поле поиска "IDLE":В Unix-подобных операционных системах (Linux, MacOS), IDLE запускается через терминал командой idle. Если программа не запустилась, поищите idle в каталоге tools/idle дистрибутива Python. Если idle отсутствует в вашей системе, установите его командой:

при нажатии на "enter" в нужных конструкциях, отступы создаются автоматически;

если вам необходимо сдвинуться на предыдущий уровень, нажмите "Backspace" или стрелку "Влево";

если необходимо сдвинуться вправо, нажмите "Tab" или стрелку "Вправо";

если вы напечатали выражение pass, return, break, continue или raise и нажали "enter", каретка автоматически вернется к прежнему отступу.

Объяснение:я вроде всё написал

//Pascal ABC.NET 3.2 сборка 1318

Var
  f:text;
  n:integer;
  s:string;

   
procedure VoTeRaz(f:text;n:integer;s:string);
  begin
    writeln('Было:');
assign(f,'Input.txt');
reset(f);
while not(Eof(f)) do
  begin
    read(f,n);
    write(n,' ');
    if n>7 then n:=n*(n div 7);
    s:=s+inttostr(n)+' ';
  end;
delete(s,length(s),1);
close(f);
assign(f,'Input.txt');
rewrite(f);
write(f,s);
close(f);
writeln;
writeln('Стало:');
write(s);
writeln;
end;

function VoTeDva(f:text;n:integer;s:string):integer;
  begin
    writeln('Было:');
assign(f,'Input.txt');
reset(f);
while not(Eof(f)) do
  begin
    read(f,n);
    write(n,' ');
    if n>7 then n:=n*(n div 7);
    s:=s+inttostr(n)+' ';
  end;
delete(s,length(s),1);
close(f);
assign(f,'Input.txt');
rewrite(f);
write(f,s);
close(f);
writeln;
writeln('Стало:');
write(s);
writeln;
VoTeDva:=0;
end;
   
begin
VoTeRaz(f,n,s);
VoTeDva(f,n,s);
end.

Начальное содержимое Input.txt:
81 5 6
Пример работы программы:
Было:
81 5 6 
Стало:
891 5 6
Было:
891 5 6 
Стало:
113157 5 6