Const
N = 5;
var
i: integer;
a: array[1..N * 2 + 1] of integer;
begin
writeln('Исходный массив: ');
for i := 1 to 2 * N do
begin
a[i] := Random(99) + 1;
write(a[i] : 5);
end;
for i := 2 * N + 1 downto N + 1 do
a[i] := a[i - 1];
a[N + 1] := 0;
writeln();
writeln('Полученный массив: ');
for i := 1 to 2 * N + 1 do
write(a[i] : 5);
end.
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrReal(4);
Writeln('Max=',a.Max,', min',a.Min)
end.
<u>Пример:</u>
-45.4 18 0 4.17
Max=18, min-45.4
Частота дискретизации 22.05 кГц = 22050 Гц означает, что в секунду делается 22050 отсчетов уровня звука. Каждый отсчет в одном канале звука кодируется 16 битами, что составляет 16/8 = 2 байта. В стереофайле каналов два, потому на отсчет требуется 2×2 = 4 байта. Секунда звука кодируется 4×22050 = 88200 байтами. А пять секунд потребуют 5×88200 = 441000 байт.
При однобайтной кодировке символ занимает 1 байт, поэтому в документе будет 441 000 символов.
Ответ:
280
Объяснение:
Если вы умеете решать дороги, то тут такой же принцип
Снизу путь, сверху кол-во вариантов
Сверху кол-во возможных вариантов продвижений, если у нас можно попасть несколькими способами, то просто суммируем значение вариантов