Что произойдет с формулой =2*(А1+В1)при копировании из ячейки С1 А) в ячейку С5
Б) в ячейку Е5

128₁₀ = 10000000₂

164₁₀ = 10100100₂

177₁₀ = 10110001₂

125₁₀ = 1111101₂

215₁₀ = 11010111₂

247₁₀ = 11110111₂

Объяснение:

128₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 0*2³ + 0*2⁴ + 0*2⁵ + 0*2⁶ + 1*2⁷ = 10000000₂

164₁₀ = 0*2⁰ + 0*2¹ + 1*2² + 0*2³ + 0*2⁴ + 1*2⁵ + 0*2⁶ + 1*2⁷ = 10100100₂

177₁₀ = 1*2⁰ + 0*2¹ + 0*2² + 0*2³ + 1*2⁴ + 1*2⁵ + 0*2⁶ + 1*2⁷ = 10110001₂

125₁₀ = 1*2⁰ + 0*2¹ + 1*2² + 1*2³ + 1*2⁴ + 1*2⁵ + 1*2⁶ = 1111101₂

215₁₀ = 1*2⁰ + 1*2¹ + 1*2² + 0*2³ + 1*2⁴ + 0*2⁵ + 1*2⁶ + 1*2⁷ = 11010111₂

247₁₀ = 1*2⁰ + 1*2¹ + 1*2² + 0*2³ + 1*2⁴ + 1*2⁵ + 1*2⁶ + 1*2⁷ = 11110111₂

program RadToGrad;

var

 Rd, Gr, G, M, S: Real;

begin

 Write ('Rd = ');

 ReadLn (Rd);

 Gr := Rd * 180 / pi;

 G := Int (Gr);

 M := Int (Frac (Gr) * 60);

 S := Frac (Frac (Gr) * 60);

 Write (Rd:4:2, ' Rad = ', G:3:0, ' гр. ', M:3:0, ' мин ', S:3:1,' сек');

 ReadLn;

end.

program GradToRad;

var

 Rd, Gr, G, M, S: Real;

begin

 Write ('Введите грудусы, минуты, секунды: ');

 ReadLn (G, M, S);

 Gr := G + M / 60 + S / 3600;

 Rd := Gr * Pi / 180;

 Write ('Rad = ', Rd :15 :15);

 ReadLn;

end.

program Protiv;

var

 a, b, c: Integer;

begin

 Write ('Введите три числа: ');

 ReadLn (a, b, c);

 if a = - b then

   WriteLn (a, ' и ', b, ' взаимно противоположные.')

 else if a = - c then

   WriteLn (a, ' и ', c, ' взаимно противоположные.')

 else if b = - c then

   WriteLn (b, ' и ', c, ' взаимно противоположные.')

 else

   WriteLn ('Взаимно противоположных чисел нет.');

 ReadLn;

end.