1КБ= 1024 байт
1024*0,5=512 байт
512-500 = 12 байт (разница между сообщениями)
Будет один если х неизвестин
Ответ:
function getSmallArrayItem(arr: array [0..9] of integer): integer;
begin
result := arr[0];
for i := 1 to (Length(arr) - 1) do
begin
if (array[i] < result) then
result := array(i);
end;
end;
Объяснение:
Перевод из 10-ой с/с в 2-ую
1)-73₁₀ = -1001001₂
2)-11₁₀ = -1011₂
3)-97₁₀ = 1100001₂
4) 43₀ = 101011₂
5) 83₁₀ = 1010011₂
6) 15₁₀<span> = 1111</span>₂