Исходный файл - 15 Мбайт
Его перезаписали в формате стерео 2 канала, значит 15 Мбайт увеличивается в 2 раза = 30 Мбайт.
Потом его оцифровали с разрешением в 3 раза выше исходного, значит увеличиваем еще в 3 раза 30×3=90 Мбайт
Частота дискретизации была меньше в 2 раза, чем у исходного, значит делим на 2. 90÷2=45 <span>Мбайт
Сжатия не проводилось, поэтому ответ: </span><span>45 </span>Мбайт
Можно всё записать в один пример:
Двойки сокращаются, остаётся 15*3 = 45 Мбайт
//PascalABC.NET 3.1 сборка 1219
procedure PrintMatrix(a: array[,] of integer);
begin
for var i := a.GetLowerBound(0) to a.GetUpperBound(0) do
begin
writeln;
for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do
write(a[i, j], ' ');
end;
writeln;
end;
begin
var a := MatrixRandom(ReadInteger('n ='), ReadInteger('m ='), 0, 255);
PrintMatrix(a);
for var i := a.GetLowerBound(0) to (a.GetUpperBound(0) div 2) do
for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do
swap(a[i, j], a[a.GetLowerBound(0) + a.GetUpperBound(0) - i, j]);
PrintMatrix(a);
end.
Одну единственную
for (интератор начала, условие выхода, шаг) { }
П0 -> П1 ИП0 x^2 пи * 3 / С/П ИП0 x^2 ИП1 x^2 + КвКор ИП0 пи * * ИП0 x^2 пи * + С/П
Ввод: R -> h С/П. Далее на экране объём, после С/П - площадь поверхности.
1) Решение квадратного уравнения через дискриминант
2) Нахождение производной сложной функции
3) Нахождение экстремума функции
4) Решение уравнения с одним неизвестным
5) Решение уравнение с двумя неизвестными
6) Нахождение площади куба/параллелограма/квадрата и тд
7) Нахождение периметра
Достаточно? :D