В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 6, 14, 25, 43, 37, 21, 15, 18, 24, 30 соответственно, т. е. A[0] =6, A[1] = 14 и т. д. Определите значение переменной s после выполнения следующей программы:

s := 0;

n := 5;

for i:=0 to 9 do

if A[i] >= A[n] then begin

s := s + A[i];

t := A[i];

A[i] := A[n];

A[n] := t;

n := i;

end;

writeln(s)

канал - 5букв

телевизор,компьютер 9букв

крик - 4буквы

program p_1; var i, n : integer; s : real; b : array [1..1000] of real; begin writeln('введите количество значений массива n'); readln(n); write('введите элементы массива а: '); for i: =1 to n do readln(a[i]);   writeln('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if a[i] mod 2 = 0 then s: =s+b[i]; writeln('сумма четных значений =', s); end.

один символ - один байт, значит надо кол-во бит поделить на 8:

24576 /8 = 3072 символа

2 единицы в двоичной записи числа 1025

10000000001