Var m:array of integer;
a,b,i,n,min,max:integer;
begin
readln(n,a,b);
setlength(m,n);
n-=1;
a-=1;
b-=1;
max:=a;
min:=a;
for i:=0 to n do begin
read(m[i]);
if (i>=a) and (i<=b) and (m[i]>m[max]) then max:=i;
if (i>=a) and (i<=b) and (m[i]<m[min]) then min:=i;
end;
writeln('Min ',m[min],' Max ',m[max]);
<span>end.</span>
Пусть даны сторона ромба a и радиус вписанной окружности r. Тогда площадь ромба равна 2ar.
Необходимо получить значения a, r; вычислить значение площади и вывести его. Блок-схема приведена во вложении.
Ответ:
2 единицы
643
A1B
Объяснение:
Сколько единиц в двоичной записи числа 65? - 100 0001 - 2 единицы
1A3(16) - это 643(8) или 419 (10)
101000011011(2) - A1B(16)
800*600=480000точек
точка 1*1 весит 16 бит
480000*16=7680000(бит)
7680000:8=960000(байт)
960000:1024=937.5(кб)
Объем файла : С=t*b*N, где С- Объем звукозаписи в байтах, t - время в сек., b- разрядность в байтах, N - частота дискретизации в Гц или 1/сек.
С= 60*(16/8)*44000 = 5280000 байт = 5156 КБайт = 5,03 Мбайт
Продолжительность звукозаписи из той же формулы:
t=C/b*N C- Объем диска в байтах. b- разрядность в байтах, t- время в сек.
t=(700*1024*1024)/(16/8)*44000= 8340,94 сек = 139 мин.