P(вероятность) синих=10/20=1/2 Тогда N=2 Тогда i (количество информации)=1 (N=2^i)
Pзел= 5/20=1/4 N=4 i=2
Pж=4/20=1/5 N=5 i≈2.32
Pкр=1/20 N=20 i=4.32
Const n=5; m=6;
var x:array[1..n,1..m] of integer;
k:array[1..m] of integer;
i,j,k0:integer;
begin
Randomize;
For i:=1 to n do begin
for j:=1 to m do begin
x[i,j]:=Random(20)-10;
write(x[i,j]:4);
end;
writeln;
end;
for j:=1 to m do begin
k0:=0;
for i:=1 to n do if x[i,j]<0 then k0:=k0+1;
k[j]:=k0;
end;
writeln('Количество отрицательных элементов в столбцах:');
for j:=1 to m do write(k[j]:4);
writeln;
<span>end.</span>
Program mm;
var a,x: integer;
begin
uses crt;
write('x');
readln(x);
a:=cos(x)+sqrt(x);
writeln('y= ', a:4:2);
readln; {возможно readkey, зависит от Паскаля}
end.
<u><span>Три красных и один голубой!</span></u>
<span>Так как красных было больше чем голубых то слебовательно красных больше Двух. Тоесть или 3 или 4. Так как по условию мама купила не только шары красного цвета но и синего то заведомо хоть один синего цвета -> <span>3 красных и 1 голубой.</span></span>