var
a:array[1..100] of integer;
x,i,n,min:integer;
begin
readln(n);
x:=1;
read(a[1]);
min:=a[1];
for I:=2 to n do
begin
read(a[i]);
if a[i]<min then
begin
min:=a[i];
x:=1
end;
if a[i]=min then x:=x+1;
end;
writeln(x)
end.
Комментарий: n- количество элементов массива, вводится с клавиатуры в диапазоне от 1 до 100
6BC=6*16²+11*16+12=1536+176+12=1724
Получаем 2 уравнения:
1) 3x+2=4, где 3x+2>0, 3x>-2; x>-2/3
3x=2; x=2/3;
2/3>-2/3 - верно
2) -3x-2=4, где x<-2/3
3x=-6
x=-2,
-2<-2/3 - верно
2 корня: -2 и 2/3
Ответ: б
сначала идет действие 2i=64, i=6 бит
затем т.к на каждую табличку нанесено 512символов, мы 6*512=3072 бита
и всего у племени 1024 таблички, мы 3072*1024=3145728 битов, и это преведем в байты, надо 3145728\8=393216 байтов, и если надо перевести в Кбайты, нужно 393216\1024=384 Кбайта