Пятеричная система счисления, ибо 4-ка есть.
<em><u>Первый алгоритм:</u></em>const
n=30;
var
a:array[1..30] of integer;
s:longint;
i:integer;
begin
{ формируем массив }
Randomize;
Writeln('Элементы массива:');
for i:=1 to n do
begin a[i]:=Random(51)-25; Write(a[i]:4) end;
Writeln;
{ собственно, алгоритм }
s:=a[1]*a[2]; i:=3;
while i<=n-1 do
begin s:=s+a[i]*a[i+1]; i:=i+2 end;
Writeln('Сумма пар произведений равна ',s)
end.
<em><u>Тестовое решение:</u></em>Элементы массива:
1 10 -9 -12 -2 20 21 14 5 19 21 -14 -10 -17 5 -9 -8 17 18 11 -21 -3 -15 -10 -15 -16 -15 2 3 21
Сумма пар произведений равна 846
<em><u>Второй алгоритм</u></em>const
n=30;
var
a:array[1..30] of integer;
smax,imax:longint;
i:integer;
begin
{ формируем массив }
Randomize;
Writeln('Элементы массива:');
for i:=1 to n do
begin a[i]:=Random(51)-25; Write(a[i]:4) end;
Writeln;
{ собственно, алгоритм }
smax:=a[1]+a[2]; imax:=1;
for i:=2 to n-1 do
if smax<a[i]+a[i+1] then
begin smax:=a[i]+a[i+1]; imax:=i end;
Writeln('Номер первого из пары элементов с максимальной суммой: ',imax)
end.
<em><u>Тестовое решение:</u></em>Элементы массива:
23 13 -11 -1 -18 20 -23 1 -21 -10 7 15 -2 24 -18 -22 -13 12 -16 22 19 -14 -14 -14 19 15 8 -15 -19 -22
Номер первого из пары элементов с максимальной суммой: 20
Ответ: 1
Смотри схему.
Сначала пишем название каталога с которого начинал пользователь и стрелочками иллюстрируем его путь. В данном случае 2 уровня вверх и 1 вниз. (Черный цвет)
Потом из полного пути каталога в котором он оказался (C:\2012\Текст\Таблицы) заполняем от конца к началу. (Красный цвет)
Т.к. выше Текст пользователь не поднимался то до Текста (включительно) путь остаётся без изменений: C:\2012\Текст
По схеме видно, что между Текст и Работа1 должен находится ещё один элемент пути (на схеме ?), т,е. путь имеет вид C:\2012\Текст\?\Работа1
Под этот вид подходит только ответ под цифрой 1.
383 воооооооот тааааааааак вроде.
вообще какого формата фильм, потому что у разных форматов разное сжатие..
ну вообще 24*(3*60*60) = 259200 кадров форматом 1024х1024
