У тани есть флешка объемом 3 гб. она хочет скопировать себе на флешку текст.известно что он состоит из 1920 страниц и на каждой странице256,строк а в каждой строке 80 символов каждый символ закодирован в шестнадцатиразрядной кодировке данный текст еще содержит 270 рисунков разбитые на 2 части в первой части содержица треть рисунков каждый из которых имеет размер 8 мб во второй части находится все остольные рисунки размер каждого из них в 4 раза меньше чем размер рисунка из первой части сколько мегабайт свободного места останется на флешке после того как таня скопирует туда текст с рисунками ?
n = 10;
var
D: array[1..n] of integer;
function Sum3(k: integer): integer;
begin
Sum3 := D[k] + D[k + 1] + D[k + 2]
end;
var
i: integer;
begin
Randomize;
Writeln('Элементы массива');
for i := 1 to n do
begin D[i] := Random(11); Write(D[i]:3) end;
Writeln;
Writeln('Сумма D[1]..D[3]: ', Sum3(1));
Writeln('Сумма D[3]..D[5]: ', Sum3(3));
Writeln('Сумма D[4]..D[6]: ', Sum3(4))
end.
Тестовое решение:
Элементы массива
2 1 5 9 10 2 9 7 2 1
Сумма D[1]..D[3]: 8
Сумма D[3]..D[5]: 24
Сумма D[4]..D[6]: 21