Атос & (Портос | Арамис) = (Атос & Портос) | (Атос & Арамис)
Формула включений-исключений
P(Атос&Портос | Атос&Арамис) = P(Атос & Арамис) + P(Атос & Портос) - P(Атос & Арамис & Атос & Портос) = 235 + 335 - 120 = 450
Var
i:integer;
a:array [1..8] of real;
begin
randomize;
for i:=1 to 8 do
begin
a[i]:=8+ Random;
writeln(a[i]:0:2);
end;
end.
лови))
program c1;
uses crt;
var b:array[1..3] of shortint;
min:integer;
max:integer;
i:integer;
begin
for i:=1 to 3 do
begin
readln(b[i])
if(i=1) then
begin
min:=b[i];
max:=b[i];
end;
if(b[i]<min) then
begin
min:=b[i];
end;
if(b[i]>max) then
begin
max:=b[i]
end;
end
if(min<0) then
begin
writeln(min*max);
end else
begin
writeln(min+max);
end;
end.
Объяснение:
Вот таблица, горизонтальные не принимает;)