Program dfg;
var
i,b,a:integer;
begin
randomize;
b:=1;
for i:=1 to 10 do
begin
a:=random(10);
writeln('а = ',a);
end;
<span>end.</span>
Столько же, во сколько раз отрезок а больше отрезка б.
Там нужен точный ответ или так?)))
Var
p, r: real;
f: Text;
begin
Assign(f, 'input.txt');
Reset(f);
read(f, p);
Close(f);
r := p - 0.1 * p;
r := r + 0.1 * r;
writeln(r:0:2)
end.
Тестовое решение:
9.90
Ответ:
164 байта
Объяснение:
Вычислим необходимое число бит для хранения одного пикселя в первом случае:
Во втором случае цвета 2, следовательно, понадобится бит для хранения каждого пикселя.
Так как файл изображение по условию одно и то же, то есть количество пикселей не меняется, то можем утверждать, что в результате преобразования файл уменьшился в раз. Приняв размер исходного файла за , получим уравнение:
Так как байт в современных системах является элементарной единицей размера файла, размер файла округлим в большую сторону, получив 164 байта.