Var
i:integer;
n:real;
f:file of real;
begin
Assign(f,'in.dat');
Rewrite(f);
Writeln('Введите 9 вещественных чисел');
for i:=1 to 9 do begin Read(n); Write(f,n) end;
Close(f)
end.
<em><u>Пример ввода:</u></em>
Введите 9 вещественных чисел
2 -5 1.45 -81.34 5.63e-10 0 -13.45e12 17.5353 -12e-3 1000
<span>чтобы сделать презентацию, выходим на рабочий стол, нажимаем правую кнопку мыши, заходим создать и там выбираем презентация Power Point
</span>
медведь 0
пингвин 1
заяц 2
ежик 3
лось 4
сова 5
получаем 352-142=210
Ответ 2) 210
PS
Ответ 1 не подходит так как получим 453-143=310 а по условию указано, что разные картинки не могут обозначать одно число т.е. ежик и лось не могут быть равны 4
Ответ 3 и 4 не подходит т.к. в данных примерах появляется число 6 а его не должно быть по условию
3)563-243=320
4)361-241=120
Программа просит числитель и знаменатель обеих дробей через пробел и выдает произведение
Десять цифр можно закодировать в четырех битах, позволяющих хранить 2⁴=16 комбинаций (трех битов мало, они позволят хранить лишь 2³=8 комбинаций).
4 бита - это 1/2 байта (в байте 8 бит). Умножаем 1/2 байта на 140 и получаем необходимый объем, равный 70 байт.
<u><em>Ответ:</em></u> 70 байт.
