На одной странице содержится 2400 символов, всего в книге 360000 символов. В алфавите 32 буквы.
32 =
I = 5 бит.
360000 * 5 = <span>1800000.
</span>1 байт = 8 бит.
225000 бит информации.
var i : integer;
a : string;
b :array [1..16] of integer;
begin
a :='';
Randomize;
for i:= 1 to 16 do
begin
b[i]:= Random(-20,20);
if b[i] mod 2 = 0 then a:=a+ i + ' ';
end;
Writeln(a);
end.
var
n,i: integer;
b: array[1..101] of integer;
begin
readln(n);
for i:=1 to n do
begin
read(b[i]);
if ((i mod 2 = 0) and (b[i]<0)) then
inc(b[101], b[i]);
end;
write(b[101]);
end.