200 * 3 = 600 бит
<span>600 / 8 = 75 байт.</span>
У меня так получилось
a:=9
b:=3
c:=1
1. a=b - нет
2. c:=1+(a-b)
a:=a-1
b:=b+1
c:=7
a:=8
b:=4
3.a=b - нет
4.c:=4
a:=7
b:=5
5.a=b - нет
6.c:=3
a:=6
b:=6
7.a=b - да
И выведет конечный результат
a:=6
b:=6
c:=3
var a,b,c,max,min,s: integer;
begin
readln(a,b,c);
if a>b then max:=a else max:=b;
if c>max then max:=c;
if a<b then min:=a else min:=b;
if c<min then min:=c;
s:=(a+b+c)-(max+min);
writeln(s);
end.
Пример:
5 2 9
5
<span>42015 + 22015 – 15
Сначала решаешь в 10-ой системе счисления:</span>
<span>42015 + 22015 – 15 = 64015
Затем переводишь найденное число из 10-ой в 2-ую:</span>
64015(в 10-ой) = <span>1111101000001111 (в 2-ой)
В данном числе 10 единиц.
Остальные примеры решаются точно также
</span>
Всемирная паутина, наверно
World Wide Web