Program n1;
var kord: array[1..6] of real;
st: array [1..3] of real;
i: integer;
begin
i:=1;
while i<=6 do
begin
write('введите координаты точки через пробел: ');
readln(kord[i],kord[i+1]);
i:=i+2;
end;
st[1]:=sqrt(sqr(kord[3]-kord[1])+sqr(kord[4]-kord[2]));
st[2]:=sqrt(sqr(kord[5]-kord[1])+sqr(kord[6]-kord[2]));
st[3]:=sqrt(sqr(kord[5]-kord[3])+sqr(kord[6]-kord[4]));
if (st[1]<(st[2]+st[3])) and (st[2]<(st[1]+st[3])) and (st[3]<(st[1]+st[2])) then write('P=',st[1]+st[2]+st[3]) else write('треугольник не существует');
end.
Var
a, b: integer;
begin
readln(a, b);
if a * b < 0 then {если числа разных знаков}
writeln(2 * a, ' ', 2 * b)
else if a > 0 then begin{иначе одного знака и больше нуля}
if a > b then
writeln((a + b) / 2, ' ', b)
else
writeln(a, ' ', (a + b) / 2)
end
else begin
if a > b then
writeln(a, ' ', -b)
else
writeln(-a, ' ', b)
end;
end.
<span>4 Кбайта=2^12 Байтов=2^15 битов
</span>16 Мбайтов=2^14 Кбайт= 2^24 байтов= 2^27 бита
2 Гбайта= 2^11 Мбайтов= 2^21 Кбайтов= 2^34 Битов
2) <,> или =:
32 байта(256 бит) <> 64 бита
1024 байта(8192 бит) <> 64 бита
128 =
i = 7 бит (объем одного символа в алфавите Манго)
7 * 150 = 1050 бит (объем сообщения Манго)
64 =
i = 6 бит (объем одного символа в алфавите Кокоса)
6 * 200 = 1200 бит (объем сообщения Кокоса)
1200 + 1050 = 2250 бит (общий объем 2-ух сообщений)
Ответ :
2250 бит