Ам, ну там сверху есть "выравнивалки"
Попробуй поэкспериментировать с полосками ("выравнивалками")
var a: array [1..10] of integer; c,sum: integer;beginsum:=0; writeln('введите элементы массива '); for c := 1 to 10 do read(a[c]); for c := 1 to 10 do if (a[c] mod 9) = 0 then sum:=sum+a[c];writeln('сумма равна =',sum);end.
1) Приводим дорби к общему знаменателю
1 кбайт = 1024 байт.
1 байт =8 бит.
1 кбайт = 1024*8=8192 бит.
0,5 кбайт = 8192/2=4096 бит.
Ответ: 4096 бит.