ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

底辺私立医大を卒業した医者って頭悪いよね？ Part28

PC,ｽﾏﾎ,PHSは ULA べっかんこ 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>488 > " > 宇宙空間に惑星A,B,Cがあり、惑星間の距離の比はBC:CA:AB=4:5:6である。 > A,B,Cの質量比は7:8:9である。惑星B,Cの座標をB(0,0),C(4,0)とする。 > 惑星A,B,Cとの引力の総和が最小になるように三角形ABC内に人工衛星を配置したい。 > 人工衛星を配置する座標を求めよ、有効数字3桁でよい。 > 尚、惑星や人工衛星の大きさは考慮しない。 > https://i.imgur.com/AAWjEhv.png > " > rm(list=ls()) > source('toolmini.R') > a=4 > b=5 > c=6 > ma=7 > mb=8 > mc=9 > ABC=abc2ABC(a,b,c) > Plot(0,6,zero=F) > A=ABC[1] > B=ABC[2] > C=ABC[3] > pt(A,paste0('A(',ma,')')) > pt(B,paste0('B(',mb,')')) > pt(C,paste0('C(',mc,')')) > Polygon(A,B,C,Col=8) > pt(A/2+B/2,c) > pt(A/2+C/2,b) > pt(B/2+C/2,a) > par0=c(mean(Re(c(A,B,C))),mean(Im(c(A,B,C)))) > f=\(xy){ > x=xy[1] > y=xy[2] > P=x+1i*y > if(in3(P,A,B,C)){ > return(ma/abs(P-A)^2 + mb/abs(P-B)^2 + mc/abs(P-C)^2) > }else{ > return(NA) > } > } > opt=optim(par0,f) > opt > P=opt$par[1]+1i*opt$par[2]
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・ULA
・べっかんこ(身代わりの術)
・べっかんこ(通常)
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.011s