mainprogram cone1.f subroutine cone1k1 (rd,h,r,g,b,x,y,z) 説明：色の値と底面の半径、高さを与え、三角錐を描くプログラム 入力変数： rd：底面の半径 h：高さ r：赤色の値 [0,1] g：緑色の値 [0,1] b：青色の値 [0,1] x：原点のx座標 y：原点のy座標 z：原点のz座標 使用例：