так как написано,что бутылка с МИНЕРАЛЬНОЙ водой.То значит,что в бутылке минеральная вода.В середине стоит стакан-значит в нем кофе.В кружке будет чай,а в кувшине квас.
ОТВЕТ:В БУТЫЛКЕ :МИНЕРАЛЬНАЯ ВОДА,В СТАКАНЕ :КОФЕ,В КРУЖКЕ:ЧАЙ,В КУВШИНЕ:КВАС.
0.025 Гб = 0.025*1024 Мб = 0.025*1024*1024 кб = 0.025*1024*1024*1024 байт = 26843546 байт.
45000 Гц и 16 бит означают, что каждую секунду снимается 45000 значений амплитуды. каждое кодируется 16 битами = 2 байтами, таким образом объем одной секунды = 45000*2 = 90000 байт.
Посчитаем сколько секунд у нас в файле:
26843546/90000 = 298 секунд = 4 мин 58 сек
<u>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
uses GraphABC;
begin
var p1:=Arr((220,100),(260,100),(300,140),(240,140),(240,180),
(280,220),(280,280),(220,320),(160,320),(100,260),(140,260),
(180,220),(220,220),(200,180),(200,140));
DrawPolygon(p1); FloodFill(200,300,clYellow); // тело
p1:=Arr((160,320),(160,340),(200,340),(180,360),(160,340));
Polyline(p1); FloodFill(180,350,clDarkOrange); // лапа 1
p1:=Arr((220,320),(220,340),(260,340),(240,360),(220,340));
Polyline(p1); FloodFill(240,350,clDarkOrange); // лапа 2
Line(260,140,280,120); FloodFill(280,130,clRed); // клюв
Brush.Color:=clWhite; Circle(260,120,5); // контур глаза
Brush.Color:=clBlack; Circle(260,120,2) // зрачок
end.