Вариант 14 Сколько битов памяти достаточно для кодирования 1 пикселя 64 цветного
изображения?
Графический файл содержит чёрно-белое изображение с 8 градациями
серого цвета размером 10 * 10 пикселей. Каков информационный объём
этoгo фaйла?
Какой объем видеопамяти необходим для хранения двух страниц
изображения при условии, что разрешающая дисплея равна 640
* 480 пикселей, а количество используемых цветов - 32?
Сканируется цветное изображение размером 3х5 дюйма. Разрешающая
сканера 600 x 1200 dpi, глубина цвета — 8 бит. Какой
информационный объём будет иметь полученный графический файл?
В процессе преобразования растрового графического изображения
количество цветов в палитре уменьшилось с 16 777 216 до 256. Во сколько
раз при этом уменьшили формационный объём изобраления?
НУЖНО ВСЁ РЕШИТЬ
Если игра безошибочна, тогда первый игрок может первым ходом увеличить в 3 раза вторую кучу (2*3=6), второй не станет увеличивать эту-же на 3 т.к сразу проиграет (18>17),
1) он может увеличит первую на три, тогда второй эту же увеличит на 3 и результат 1*3(2)*3(1)=9
9+6=15, первый победит
2)первый игрок будут играть аккуратно и постоянно прибавлять по 2 во вторую кучу, поскольку и в первого "безошибочная игра", то он не станет прибавлять в 1 2 камня(1+2=3, первый умножает эту кучу на 3 и результат 6+(3*3)=15), поэтому и первый и второй будут прибавлять во вторую кучу 6_{1}+2_{2}+2_{1}+2_{2}+2_{1}=15+2_{2}=176
1
+2
2
+2
1
+2
2
+2
1
=15+2
2
=17 17=17 (что по условию не подходит), выиграл 1
Логистинг задачи:
var i,n,max,d:LongInt;
x1,x2:Real;
begin
max:=1;
Read(n);
for i:=1 to n div 2 do
begin
d:=sqr(2*i-1)+8*n;
if d<0 then Continue;
x1:=((1-2*i)-sqrt(d))/2;
x2:=((1-2*i)+sqrt(d))/2;
if (frac(x1)=0) and (x1>max) then
begin
max:=Round(x1);
Break;
end;
if (frac(x2)=0) and (x2>max) then
begin
max:=Round(x2);
Break;
end;
end;
Writeln(max);
end.
Листинг программы:
var n, s: longint;
begin
readln(s);
s := 2 * s; {лучше s := s shl 1;}
n := trunc(sqrt(s)); {можно, как планировалось, n := trunc(sqrt(s + 0.25) - 0.5);}
while n > 1 do
if (s mod n = 0) and odd(s div n - n)
then break
else dec(n);
writeln(n)
end.