2^3=8 ---> 3 бита для кодировки одного цвета
Всё изображение занимает объём памяти= 3*х,
где х - размер растрового изображения
Скорость передачи v=3x/30=x/10
после изменения кол-ва цветов их стало (3+y):
v=(3+y)*x/20; v - скорость передачи - величина постоянная
Уравнение:
(3+y)*x/20=x/10
(3+y)/2=1
(3+y)=2
y=-1
цветов стало:
3+у=3-1=2 бита для одного цвета, количество цветов =2^2=4 цвета
Было: 8 цветов
Стало 4 цвета для передачи изображения в Б
Дано:
V*4 с=608 Мб
K=2048*1024
I=8 бит=1 байт
Найти:
частота — ?
Решение:
V=608 : 4=152 Мб (за 1 сек) * 1024=155648 Кб * 1024=159 383 552 байт
V=K*I*частота
частота=V/(K*I)
частота=159 383 552/(2048*1024*1)=76 Гц
Ответ: 76 Гц
1.
Program num1;
Uses crt;
Var
a :array [1..100] of integer;
i,k,n, s : integer;
Begin
clrscr;
s:=0;
write('K=');readln(k);
write('N=');readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n do
if (a[i] MOD k)=0 then s:=s+a[i];
writeln('S=',s);
End.
2.
Program num2;
Uses crt;
Var
a :array [1..100] of real;
i,n,j : integer;
x : array [1..100] of real;
Begin
clrscr;
write('n=');readln(n);
for i:=1 to n do
readln(a[i]);
j:=1;
for i:=1 to n do
if a[i]=0 then
begin
x[j]:=i;
j:=j+1
end;
for i:=1 to j-1 do
write(x[i],' ');
End.
3.
Program num3;
Uses crt;
VAr
a :array [1..100] of real;
i,n : integer;
Begin
clrscr;
write('n=');readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n do
begin
if a[i]<>0 then
if a[i]>0 then
begin
writeln('Положительное встречается раньше');
break
end else
begin
writeln('Отрицательное встречается раньше');
break
end;
end;
End.
4.
Program num4;
Uses crt;
Var
a : array [1..100] of real;
i, n, j :integer;
Begin
clrscr;
write('n=');readln(n);
a[n+1]:=a[n]+1;
for i:=1 to n do
readln(a[i]);
j:=0;
i:=1;
while i<n do
begin
if a[i]<a[i+1] then
begin
j:=j+1;
i:=i+1
end
else
begin
writeln('Последовательность невозрастающая');
break
end;
end;
if i=n then writeln('Последовательность возрастающая');
End.
150 ЭТО 1200 БИТ
20*30=600
600 ЭТО 4800 БИТ
1200*4800=5 760 000 БИТ
ОТВЕТ В БАЙТАХ: 90 000 БАЙТ
1) Нахождение эталона (детали которые весят одинаково)
сравниваем 2 детали. если они равны, то они эталоны, если не равны, то эталоны те что не взвешивались
2) сравниваем одну деталь из эталонной пары с деталью из нежталонной пары.
если равны, то искомая деталь, это та из неэталонной пары которая не взвешивалась
если не равны, то та деталь из неэталонной пары, которая взвешивалась