var A, F, G: array [1..20] of integer;
sA, sF: string;
i: integer;
begin
for i:= 1 to 20 do
begin
A[i] := random(-20, 20);
F[i] := random(-20, 20);
sA += A[i] + ' ';
sF += F[i] + ' ';
end;
writeln('A: ' + sA);
writeln('F: ' + sF);
write('G: ');
for i:= 1 to 20 do
begin
if A[i] < F[i] then
G[i] := A[i]
else
G[i] := F[i];
write(G[i] + ' ');
end;
writeln();
end.
1. 75*65= 4875 - кол-во информации в 1 колонке на 1 странице.
2. 4875*2= 9750 - кол-во информации в 2 колонках на 1 странице.
3. 9750* 1190= 11602500 бит - кол-во информации всего.
4. 11602500/8= 1450312,5 байт - кол-во информации в байтах.
5. 1450312,5/1024= 1416,32 кб - кол-во информации в килобайтах.