1. 32=2^i, отсюда i=5 бит - объем одного символа в 1ом тексте.
2.64=2^i , отсюда i=6 бит - объем одного символа во 2ом тексте.
3.Символов в обоих текстах одинаковое кол-во, тогда найдем разницу в их инф. объемах
6/5=1.2
Ответ: в 1.2 раза
<span>К - это количество символов в тексте.
I - это количество информации во всём тексте.</span>
Const m=10;
var
a:array[1..m] of integer;
i,sum,proz:integer;
begin
sum:=0;
proz:=1;
for i:=1 to m do
begin
read(a[i]);
if a[i]>0 then
sum:=sum+a[i]
else
ifa[i]<0 then
proz:=proz*a[i];
end;
writeln('Сумма положительных чисел= ',sum,' Произведение отрицательных чисел= ',proz);<span>end.</span>
Вот код, но я делал проверку используя while
1) Ярлык
2) Элементы управления
3) Представление
С тебя спасибка!