Program chik;
var c:array[1..1000,1..1000]of longint;
n,m,i,j,p:longint;
begin
read(n,m);
for i:=1 to n do
beginf
or j:=1 to m do
begin
read(c[i,j]);
end;
end;
for j:=1 to m do
begin
p:=c[3,j];
c[3,j]:=c[5,j];
c[5,j]:=p;
end;
for i:=1 to n do
begin
for j:=1 to m do
begin
write(c[i,j]:3,' ');
end;
writeln;
end;
end.<span>
</span>
N =
,
N - количество цветов.
I - количество бит на пиксель.
V = K * I,
V - объем.
K - размер изображения.
Дано:
K = 512 * 1024 пикселей.
V = 1 мбайт.
Найти: N.
Чтобы найти количество цветов, нам нужно найти количество бит на пиксель. Расчет произведем через степени двойки.
Переведем мбайты в биты, умножив объем на
(мбайт -> биты).
V = K * I.
I =
бит.
Теперь можем найти количество цветов.
N =
.
N =
цветов.
Ответ: 65536 цветов.
Var
x0,xn,c:real;
x,y,xmax,ymax:real;
begin
writeln('Xнач, Xкон:');
readln(x0,xn);
write('С = '); readln(c);
x:=x0;
xmax:=x; ymax:=x*x-100*x+10;
repeat
x:=x+c;
y:=x*x-100*x+10;
if y>ymax then begin xmax:=x; ymax:=y; end;
until x>=xn;
writeln('xmax = ',xmax,' ymax = ',ymax);
end.
Пример:
Xнач, Xкон:
-10 20
С = 1
xmax = -10 ymax = 1110
Единица измерения расстояния
Вариант ответа 4 - PPT
P.S. Во втором варианте буква X означает что у презентации будет совместимость со старыми версиями PowerPoint( вроде бы с 1997-2003)