Const n = 50;// количество элем массиваvar a: array [1..n] of integer; kol, i: integer;begin for i := 1 to n do readln(a[i]); for i := 2 to n - 1 do if (a[i] > a[i + 1]) and (a[i] > a[i - 1]) then kol := kol + 1; writeln(kol); end.
1. 64-символьный алфавит это значит для каждого символа использовалось b бит: то есть b = 6 бит/символ. 3072 символа * 6 бит/символ = 18432 бит = (18432 / 8) байт = 2304 байт
2. на одной странице 48 строк на странице * 64 символа в строке = 3072 символа на странице. Всего символов = 3 страницы * 3072 символа на стр = 9216 символов
256-символьный алфавит это значит для каждого символа использовалось b бит: то есть b = 8 бит/символ = 1 байт/символ.
Общий объем = 9216 символов * 1 байт/символ = 9216 байт = (9216 / 1024) кБайт = 9 кБайт
n = 50;// количество элем массиваvar
a: array [1..n] of integer;
kol, i: integer;begin
for i := 1 to n do
readln(a[i]);
for i := 2 to n - 1 do
if (a[i] > a[i + 1]) and (a[i] > a[i - 1]) then
kol := kol + 1;
writeln(kol);
end.