1)V=(1024*1024*7*24)/(8*1024*1024)=21(Мб)
2)V=(2048*768*256*25*5*60)/(8*1024*1024*1024)=351,5625≈352(Гб)
Ответ: 38 учеников. Примерно 50/50 мальчиков и девочек
Program abc;
Const
n=3;
m=3;
Var a:array[1..n,1..m] of integer;
b,y,i,j,sum:integer;
srd:real;
Begin
Writeln('Введите числа массива: ');
For i:=1 to n do
For j:=1 to m do
Begin
Write('a[',i,',',j,']= ');
Readln(a[i,j]);
if a[i,j]>0 then
begin
sum:=sum+a[i,j];
inc(b);
end
else
If a[i,j]<0 then
Inc(y);
End;
If sum>0 then
begin
srd:=sum/b;
Writeln('Среднее =',srd);
end
else
Writeln('Нет положительных членов массива');
If y>0 then
begin
Writeln('Количество отрицательных элементов =',y);
end
else
Writeln('Нет отрицательных членов массива');
End.
бег - бог - рог - рок - рак - мак - маг - шаг
<span>c. 0+0=0, 1+0=1, 0+1=1, 1+1=0
5.</span>100110101002 на 11002≈9099263
9099263₁₀=1000 1010 1101 0111 1111 1111₂
<span>
</span>