1) 8×70=560
2) 3500÷560=6,25
Ответ:6,25
Begin
var a:=ArrRandom(10,-150,250); a.Println;
var max := a.Max;
println('Максимальное = ', max);
a.Transform(t->t=max ? max*(-1):t);
a.Println;
end.
Рассматриваем однобайтное представление целых чисел. Старший (левый) разряд знаковый, остальные семь хранят число в дополнительном двоичном коде.
У положительного числа в знаковом разряде 0, у отрицательного единица.
Для положительного числа прямой, обратный и дополнительный коды совпадают.
У отрицательного числа в обратном коде все биты, кроме знакового, инвертируются. Для получения дополнительного кoда число в обратном коде арифметически увеличивается на 1.
Чтобы получить для отрицательного числа прямой код, нужно инвертировать все его биты, кроме знакового, а затем арифметически увеличить код на 1.
ответ под буквой А. поучится так, если попробовать подставить значения.
begin
var a := ArrRandom(30, 10, 99);
a.println;
writeln(a.Where(x -> (x mod 17 = 0)).DefaultIfEmpty.Aggregate(1, (i, j)-> i * j));
<span>end.
</span>