Если поочередно, то это временное разделение
1. при сложении и вычитании двоичных чисел помним о следующих правилах:
0+0=0 0-0 = 0
1+0=1 1-0 = 1
1+1 = 10 1-1 = 0
0+1 = 1 10-1 = 1
1010+10 = 1100
1010-10 = 1000
2.при умножении и делении действуем так же, как в десятичной СС
1010 1010*10 = 10100
<u>* 10</u>
0000
<u>+1010 </u>
10100
1010<u>| 10 </u> 1010/10 = 101<u>
</u>
<u>1010</u> 101
0
Код Pascal:
Var
P:byte;
Begin
Write('Введите рост человека: ');ReadLn(P);
if P > 180 then WriteLn('Высокий')
else WriteLn('Не очень высокий')
End.
Пример работы программы:
Введите рост человека: 150
Не очень высокий
Begin
var s:=readlnstring;
var gl:='АЕИОУЫЯЁЮЭ';
var m:=s.ToWords;
var k:=m.Length;
var b:=new integer[k];
for var i:=0 to k-1 do
b[i]:=m[i].Where(c->c.ToUpper in gl).Count;
Writeln(m[b.IndexMax])
end.