Они злоумышленники. Их цель навредить человеку или какой нибудь компании,нанеся им материальные убытки в виде поломанной техники или обесценивания товара
program xxx;
var i, k : integer;
a : array [1..10] of real;
begin
write('введите элементы массива А:');
for i:=1 to 10 do
readln(a[i]);
writeln('исходный массив А:');
for i:=1 to 10 do
write(a[i]);
k:=0;
for i:=1 to 9 do
if a[i]<>a[10] then k:=k+1;
writeln('элементов отдичных от последнего -', k);
readln
end.
От 0 до 100 - это 101 разное значение. 64<101<128, значит для кодирования надо 7 бит, 128=2^7. 7*80=560 бит. 560 бит = 560/8 байт = 70 байт.