Общее количество рыб = 10+20+70 = 100
Вероятность поймать линя = 10/100 = 1/10 = 0,1
Вероятность поймать окуня = 20/100 = 1/5 = 0,2
Вероятность поймать карася = 70/100 = 7/10 = 0,7
2 близнеца >
1 близнец <
отец/мать >
1 близнец <
2 близнеца >
1 близнец <
мать/отец >
1 близнец <
2 близнеца >
Var n,I,c:integer;
begin
c:=0;
read(n);
for i:=1 to n do
if (i mod 2 != 0) and (i mod 3 != 0) and (i mod 5 != 0) then c:=c+1;
write(c);
end.
проверь в компиляторе, я Паскаль плохо помню, не уверен
6Мб=6*2^23 бита
6*2^23/24=1/4*2^23=2^-2*2^23=2^21=2097152 точек