高校数学の質問スレ Part436

[過去ﾛｸﾞ] 高校数学の質問スレ Part436 (1002ﾚｽ)
上下前次1-新
通常表示 512ﾊﾞｲﾄ分割ﾚｽ栞
抽出解除ﾚｽ栞

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

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

459: １３２人目の素数さん [sage] 2024/07/02(火) 17:45:38.00 ID:AsAZSqvO

>>451
検算用の数値解（Wolram言語の練習）

Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.

In[1]:= NMinimize[{p+q+r,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[1]= {-1.15978, {p -> -0.30719, q -> -0.946958, r -> 0.0943656}}

In[2]:= NMaximize[{p+q+r,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[2]= {1.71155, {p -> 0.684159, q -> 0.559314, r -> 0.468074}}

In[3]:=
In[3]:=
In[3]:= NMinimize[{p*q*r,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[3]= {-0.179151, {p -> 0.687253, q -> -0.551912, r -> 0.472316}}

In[4]:= NMaximize[{p*q*r,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[4]= {0.17915, {p -> -0.686862, q -> -0.552851, r -> 0.47178}}

In[5]:=
In[5]:= NMinimize[{p*q+q*r+r*p,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[5]= {-0.5, {p -> 0.526503, q -> -0.803711, r -> 0.277206}}

In[6]:= NMaximize[{p*q+q*r+r*p,p^2+q^2+r^2==1 && r==p^2},{p,q,r}]

Out[6]= {0.964698, {p -> 0.68416, q -> 0.559314, r -> 0.468074}}

http://rio2016.5ch.net/test/read.cgi/math/1718662026/459