Разработать таблицу, в которой рассчитать параметры электронного листа-количество ячеек и максимальное количество символов, которые могут быть размещены на электронном листе ( в единицах измерения памяти). в расчетах принять значение символов в ячейке 2^15. выполнить аналогичные расчеты для электронной книги. в расчетах принять количество листов книги 2^16. оценить, какой должна быть оперативная память компьютера, если электронная книга excel будет заполнена «под завязку». сделать выводы.
три числа (261, 263, 265) меньше чем b6
Объяснение:
Что бы сравнить числа их необходимо привести в одну систему счисления, тут проще будет B6 привести в 8ричную, т.к. одно число проще привести чем четыре :D
может есть перевода сразу из 16->8, но я не знаю его, поэтому промежуточно буду переводить в 10тичную (если хорошо знаете двоичную то можно через неё, т.к. 4 бита это 16тиричная, а 3 бита - 8миричная, через двоичную легко без вычислений даже)
и так переводим B6 в 10-тичную
(b=11)
11*16+6=182
теперь 182 переводим в 8-миричную
182/8=22 и остаток 6 (последняя цифра)
22/8=2 и остаток 6(предпоследняя цифра)
2/8=0 и остаток 2(первая цифра)
итого b6 в 8миричной будет 266
три числа (261, 263, 265) меньше чем 266
a, b, c, d: integer;
x1, x2, x: real;
begin
Writeln('Введите a,b,c');
Read(a, b, c);
d := sqr(b) - 4 * a * c;
if d > 0 then
begin
x1 := (-b - sqrt(d)) / (2 * a);
x2 := (-b + sqrt(d)) / (2 * a);
Writeln('Корни уравнения: x1=', x1, ' x2=', x2);
{ Потом убрать отсюда ... }
Writeln('*** Делаем проверку ***');
Writeln(a, 'x(', x1:0:5, ')^2+', b, 'x(', x1:0:5, ')+', c, '=', a * sqr(x1) + b * x1 + c:0:5);
Writeln(a, 'x(', x2:0:5, ')^2+', b, 'x(', x2:0:5, ')+', c, '=', a * sqr(x2) + b * x2 + c:0:5)
{ ... и досюда }
end
else
if d < 0 then
Write('Нет корней')
else
begin
x := -b / (2 * a);
Writeln('Корень уравнения: x=', x);
end;
end.
Тестовое решение:
Введите a,b,c
2 -2 -40
Корни уравнения: x1=-4 x2=5
*** Делаем проверку ***
2x(-4.00000)^2+-2x(-4.00000)+-40=0.00000
2x(5.00000)^2+-2x(5.00000)+-40=0.00000