Тебе требуется перевести значения из двоичной системы в восьмеричную, из восьмеричной в шестнадцатеричную.
var m,n:integer;
begin
readln(m,n);
if (m mod n)=0 then
write(m div n) else
<span>writeln(m,'<em> на</em> ',n,' <em>нацело не делится.');
</em></span>end.
<em>Помог ставь "<u>Лучший ответ</u>" ;)</em>
90(10) = 5A(16) = 0101 1010(2) в восьмибитном представлении
-55(10) = -37(16) = -0011 0111(2) в прямом коде. Для хранения отрицательных чисел используется модифицированный обратный код.
Обратный код получается инверсией всех битов.
-0011 0111(2) = 1100 1000(2) в восьмибитном представлении (обратный код)
Модифицированный код получается из обратного путем прибавления единицы в младшем (левом) разряде числа.
1100 1000(2) = 1100 1001(2) в восьмибитном представлении (модифицированный обратный код)
1100 1001(2) = С9(16) = 0хС9
Var m:array [1..10] of integer;
I,s:integer;
Begin
S:=0;
For i:=1 to 10 do
Read(m[i]);
For i:=1 to 10 do
S:=s+m[i];
Write(s);
End.
3000000/3=1000000 за секунду 2 сервера
1000000/2=500000- за 1 секунду один сервер
500000*4= 2000000 - за 1 секунду 4 сервера
2000000*4=8000000- за 4 секунды 4 сервера
Ну если смотреть с математической точки зрения