Двоичная система - 110110
Ответ следующий 0.3*1024=307.2Кб
3 ноября 1962 года <span>Гейб Ньюэлл
А курица учённые ещё не определились когда родилась курица .</span><span />
Var
p:array [1..4,1..5] of integer;
i,j,k:integer;
begin
for i:= 1 to 4 do
begin
for j:=1 to 5 do
begin
p[i,j]:=Random(-100,100);
write(p[i,j]:5);
end;
writeln;
end;
for i:= 1 to 4 do
begin
k:=0;
for j:=1 to 5 do
if p[i,j]>0 then k:=k+1;
writeln ('Количество положительных элементов в строке ',i,' равно: ', k);
end
end.