Ну начнем со сложного найдем общее количество символов 3*25*80=<span>6000символов всего далее путем не хитрых махинаций определим вес одного символа, а это 5бит, потому как именно два в пятой дадут нам минимальное количество возможных значений для кодировки. теперь перемножаем и получаем 6000*5=30000бит, чтобы получить кбиты нужно поделить на 1024, но это совсем другая история</span>
type diapazon=-20..60;
var a: array [1..15] of diapazon;
i,max,min: integer;
begin
max:=1;
min:=1;
for i:=1 to 15 do
begin
readln(a[i]);
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
if (max/min) > 2 then writeln('Верно') else writeln('Неверно');
end.
2. -7
3.
program HelloWorld;
var a,b,c:integer;
begin
a:=6;
b:=4;
c:=7*(a-b) + ((3*a) div (4*a));
write(c)
end.
Умножения: 0011•0101=0001111
01110•0011=101010