高校数学の質問スレ（医者・東大卒専用） Part438

高校数学の質問スレ（医者・東大卒専用） Part438 (991ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

24: 2024/08/12(月)10:39:57.82 ID:F0Hc68tw(2/2) AAS
>>22
おい尿瓶ジジイいつになったら無理数の証明できるようになるんだよ

191: 2024/08/28(水)18:57:30.82 ID:B5l1srpB(1) AAS
>>190
>>167

高校数学の基礎の基礎の証明すらできないチンパンが電卓叩いてキーキー喜んでるだけ

245: 2024/10/26(土)21:34:59.82 ID:dZVTecny(2/3) AAS
n100=100
n10=10
n9=9

sim=\(){
u=sample(0:n100,1)
u10=sum(sample(1:0,n10,replace=TRUE,prob=c(u,n100-u)))
c(u,u10)
}

k=1e5
res=t(replicate(k,sim()))
ans=res[res[,2]==n9,][,1]
hist(ans)
summary(ans)

401(3): 2024/12/08(日)21:21:32.82 ID:jwOd3Bh7(2/2) AAS
>>396
同時並行すら理解できないのが裏口容疑者

458: 2024/12/22(日)15:12:10.82 ID:rKRhCRuS(1/2) AAS
>>452
横軸にｒ、縦軸にPQRSの面積の最大値（青）最小値（赤）をグラフ化。
画像ﾘﾝｸ

Rのコードが読めれば、単純作業。（但し、Fラン卒は除く）。

480: 2024/12/29(日)11:24:48.82 ID:8wG+CYHS(1) AAS
バク頭脳のFimoseくんには解決できない問題
>479のバグを指摘せよ。

481: 2024/12/29(日)11:25:58.82 ID:bEHNzlJY(1/2) AAS
バグ頭脳って自己紹介ですか？w

770(1): 03/26(水)20:03:31.82 ID:mSCBNyUX(1) AAS
自称東大理Ⅰが滑り止め()の>>769に質問！
当然解けるよな？
ここにいる全員が納得する解答を求めます
解けなければ分かりきったことだが詐称学歴のアホと認めます

①円周率が3.05より大きいことを証明せよ東大 2003

ただし円周率は(円周)/(円の直径)と定義され、円周率が3.14より大きい事は判明していないものとする。

②√2+√3が無理数であることを証明せよ

779: 04/10(木)06:37:33.82 ID:rUVTD6v0(3/6) AAS
rm(list=ls())
"
コイン9個を3行3列の枠に表を上にして配置する。
無作為に1個のコインを選ぶ。選ばれたコイン及び上下左右に隣接するコインを裏返す。
この操作をｎ回繰り返した後にすべてのコインが裏返っている確率をP[n]とする。
コインを選ぶ順番は区別する。同じコインを複数回選んでもよい。
"
#
Pn =\(n){
nu=(1-(-1)^n)*(6+4*3^n-4*5^n-7^n+9^n)
de = (2^9*9^n)
gmp::as.bigq(nu,de)
}
#

n2b <- function(num, N=2, digit = 9){
r=num%%N
q=num%/%N
while(q > 0 | digit > 1){
r=append(q%%N,r)
q=q%/%N
digit=digit-1
}
return(rev(r))
}
b2n=\(n) (n %*% 2^(0:8))[1,1]
M=matrix(0,ncol=512,nrow=512)
colnames(M)=0:511
rownames(M)=0:511
a1=c(1,1,0,1,0,0,0,0,0)
a2=c(1,1,1,0,1,0,0,0,0)
a3=c(0,1,1,0,0,1,0,0,0)
a4=c(1,0,0,1,1,0,1,0,0)
a5=c(0,1,0,1,1,1,0,1,0)
a6=c(0,0,1,0,1,1,0,0,1)
a7=c(0,0,0,1,0,0,1,1,0)
a8=c(0,0,0,0,1,0,1,1,1)
a9=c(0,0,0,0,0,1,0,1,1)
A=rbind(a1,a2,a3,a4,a5,a6,a7,a8,a9)
f1=\(i) apply(A,1,\(v) b2n(bitwXor(n2b(i),v)))
for(i in 0:511) M[as.character(i),as.character(f1(i))]=1/9
library(expm)
solve=\(n) (M %^%n)["0","511"]
solve=Vectorize(solve)
n=c(5,7,9,11,13,15,17,19,21)
cbind(n,'P[n]'=solve(n),Pn=as.numeric(Pn(n)))

908: 06/22(日)04:51:06.82 ID:B6ITpw6T(1) AAS
>>904
難易度調整www
秒で終わるだろ
調整できてねぇwww

上下前次1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ

ぬこの手ぬこTOP 0.050s