//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var (sum,p):=(0,1.0);
ReadSeqIntegerWhile(t->t<>0).ForEach(f->begin sum+=f; p:=p*f; end);
write('сумма: ',sum,'; произведение: ',p);
end.
Дано:
Символов - 512
Мощность алфавита - 16
Формулы:
<span>2^b>=A (где A-мощность алфавита, b-количество бит, приходящееся на 1 символ).
</span>Вычисление объёма для всего текста:
Объём, приходящийся на 1 символ*количество символов=общий объём
Решение:
2^b>=16
b=4 бит
4(бит)*512(символ)=2048 бит=256 байт=0,25 кб
Ответ: <span>0,25 кб</span>
Опредилить основания классификаций:а)ель,сосна,кедр,пихта/берёза,осина,липа,тополь;б)рожь,тишь,ложь,рысь/пшеница,тишина,истина,к
Alx2040 [567]
А) хвойные/лиственные деревья
б) существительные женского рода 3 / 1 склонения
в) одежда / верхняя одежда
г) дикие / домашние животные
1837056 символа. . . . . . . . . . . .. . . . . .. . . . .. . . . . ..
Метод подбора предельно прост и туп. В первой колонке набрасываешь ряд чисел, к примеру, от -10 до 10 (потом при необходимости изменишь масштаб). Во второй пишешь само уравнение (в твоём случае: "=A1^2+3*A1-3-1"). Протягиваешь на ту же высоту. Ищешь, где оно равно или наиболее близко к нулю. Так, сразу стало видно, что корни этого уравнения: -4 и 1.