ユインタ山地お知りたい-ユタに詳しくなろう

数学の質問です。 AB=8、CA=CB、面積が12である二等辺三角形ABCがある。 点Dを∠ADB=1/2∠ACBとなるように、直線ABに関して点Cと同じ側にとる。 点Dは点Cを中心とする半径5の円の周上にあり、∠DAB=60°とすると、 BD、ADの長さを求めよ。 また、三角形ABDの面積を求めよ。 さらに、三角形ABCの内接円の中心をI、直線AIと三角形ABDの外接円との2交点のうちAでない方をEとすると、 IH、IEの長さを求めよ。 どなたかよろしくお願いいたします。

　

カテゴリ：教養と学問、サイエンス>数学、サイエンス>数学

数学についての質問です。この問題教えてください ＡＢ＝8、ＣＡ＝ＣＢ面積が12である二等辺三角形ＡＢＣがある。 辺ＡＢの中点をＨとするとＣＨ＝3であり ＣＡ＝5, sin∠ＣＡＨ＝5/3 点Ｄを∠ＡＤＢ＝2/1∠ＡＣＢになるように直線ＡＢに関して点Ｃと同じ側に点をとる、点Ｄは点Ｃを中心とする半径 5の円周上であり∠ＤＡＢ＝60°とする。 このときのＢＤとＡＤを求めよ また三角形ＡＢＣの面積を求めよ さらに三角形ＡＢＣの内接円の中心をＩ直線ＡＩと三角形ＡＢＤの外接円との2交点のうちＡでないほうをＥとすると ＩＨとＩＥを求めよ。 よろしくお願いします！！

　

カテゴリ：教養と学問、サイエンス>数学、サイエンス>数学

下記エクセルマクロを作成しましたが、エラーが発生しブックを保存するとファイルが破損してしまい修復出来なくなってしまいます。 日本語表記の時はＯＫですが、英語表記にすると発生します。簡素化したいですが。。 Sub 名前を付けて保存() ' ' Macro2 Macro ' Macro record date : 2008/7/17 User name : 00000 ' ' Sheets("Poor workability operation list").Select ActiveSheet.Unprotect Password:="333333" Sheets("yyyyyy uuuuu ｊｊｊｊｊｊ").Select ⇒ここを英語表記 Dim myFName As String myFName = InputBox("Enter the file name to save!", "Save the list") If myFName = "" Then Exit Sub Else End If Sheets("Poor workability operation list").Copy ActiveWorkbook.SaveAs (ThisWorkbook.Path & "\" & myFName & ".xls") Dim SP As Shape For Each SP In ActiveSheet.Shapes SP.Delete Next Selection.ClearContents Selection.Delete Range("AE3:AE4").Select Selection.Merge Range("AF3:AF4").Select Selection.Merge Range("AE3:AF4").Select Selection.Font.ColorIndex = 3 Range("AE3:AE4").Select ActiveCell.FormulaR1C1 = "ｒｒｒｒｒｒｒｒｒｒｒｒ" ⇒ここも英語表記 Range("AF3:AF4").Select ActiveCell.FormulaR1C1 = "ｒｒｒｒｒｒｒｒｒｒｒｒ" ⇒ここも英語表記 Range("B4:BW1004").Select Selection.UnMerge Selection.AutoFilter Rows("4:4").Select Selection.AutoFilter Range("AE3:AE4").Select Selection.Merge Range("AF3:AF4").Select Selection.Merge Range("C2:D2").Select Selection.Cut Range("B5").Select Range("K3:V3,W3:AA3,AB3:AC3,AD3:AD4,AG3:AG4,AH3:AH4,AI3:AI4,AJ3:AN3,AO3:AS3,AT3:AZ3,BA3:BG3,BH3:BO3,BP3:BV3,BW3:BW4").Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection.Merge ActiveWorkbook.Save ThisWorkbook.Close Sheets("Poor workability operation list").Select ActiveSheet.Protect Password:="333333", DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub 何故ファイルが破損するのかわかりません、それと簡素化出来る所が有れば教えて下さい。 宜しくお願いします。

　

カテゴリ：コンピュータテクノロジー>プログラミング>VisualBasic

数Iの問題です。 AB=7 BC=8 CA=5である△ABCがあり、その内心をl、垂心をHとする。Alの延長と辺BCとの交点をD、△ABCの外接円との交点をE、ま たAHの延長と辺BCとの交点をF、外接円との交点をGとする。 (問)Al:lEの比を求めよ。 この問題がまったく分かりません...。解き方のヒントを教えてくださいm(_ _)

　

カテゴリ：教養と学問、サイエンス>数学、サイエンス>数学

エクセル 関数 勤務割表 31日まである月の場合は翌月21日が表示されてしまう。 勤務割表を作っています。セルＤ2は曜日。セルＤ3は日付になっています。セルＤ3に日付を入力しセルＥ3はＤ3＋1、Ｆ3はＥ3＋1というふうに、21日から翌月20日までの表です。セルＤ2は表示方法をaaaにしてあります。 セルＤ3に日付を入力すると自動的にセルＥ3以降の日付と、曜日が入ります。ところが、 21日～翌20までの間で基点の月が30日まである月に合わせているので基点の月が31日まである月は 勤務表に翌月の21日が表示されてしまいます。ちなみに、5月分の表は、4月が30日まででしたので納まりましたが、6月の表は、5月に31日があるので21日が表示されてしまいました。31日まである月も翌月21を表示させない方法を教えて下さい。 宜しくおねがいします。

　

カテゴリ：インターネット、PCと家電>ソフトウェア>Office系（Word、Excel)