今日のプチコン問題！　第3問　難易度★★☆☆☆ INPUT命令で半径を聞いて、その半径の円の面積を求めるプログラムを書いてください。（変数名は半径がR、答えがAにして、PRINTで出力してください） ネタバレにチェックを忘れずに！ 正解発表は明日！！

単位は省いてます。

PRINT"えんのめんせきをこたえるプログラム" INPUT"はんけいは?";R A=R*R*3.14 PRINT A;"だよー"

VAR R,A WHILE 1 REPEAT INPUT "はんけい";R UNTIL R>=0 'Rが負だと再入力(面積は必ず正) A=R*R*PI() PRINT"はんけい";R;"のえんのめんせきは";A WEND

REPEAT PRINT ”えんのめんせきをけいさんします。” INPUT ”えんのはんけいをにゅうりょくしてください(mm) ",R IF R<=0 THEN PRINT ”はんけい0mmいかのえんのめんせきは、けいさんできません。” UNTIL R>0 A1=R*R：A=A1*PI() PRINT ”はんけい";R;"mmのえんのめんせきは” PRINT A;"へいほうmm　(";A1;"πへいほうmm)です。” 半径と面積の単位を明示することと半径が0以下の場合に エラートラップをするのがこの問題の狙いだと感じましたが いかがですか？ 製図とかですと単位がmmなんでこうしました。

INPUT "はんけいはいくつですか";R A=R*R*3.14 PRINT "えんのめんせきは";A;"です"

FOR I=0 TO 1 INPUT"えんのはんけいは、なんセンチ？",R I=I>=0 NEXT A=R*R ?"えんのめんせきは";A;"πへいほうセンチです。"

精度が荒いプログラムは、正解でよいか否か悩みますね……… とりあえず「およそ3」をかけている人はいなくて安心ｗ(^O^) そしてπのまま最後まで通してるツワモノが約一命

今日から正解発表は夜７時にします！

円周率を使わないで面積を求めるプログラムです。こういう方法もありますよ、ということで

実行結果はこんな感じです。1行目の変数PREを大きい数字にすればもうちょい精度のいい結果が得られますが、精度で言えば最初からPI()使えよって話ですね

「半径×半径×3.14」より、「rrπ」のほうがある意味精度が良いので「π」にしました。 (本当は「rr」なんて書きませんが、乗数の数字がキーボードにないので、「rr」にしました。)

申し訳ありません。諸事情により正解発表が19時にできませんでした。この問題の正解発表は明日の19時にさせていただきます。また、今日の問題はお休みさせていただきます。

>MGウッディー3さん プチコンではべき乗を求めるPOW関数があります。 A=5^2 は、プチコンでは A=POW(5,2) と表記します。

正解発表！ この問題もいろいろな回答例がありますが、とりあえず最短でいきます。 INPUT R PI=3.14 A=R*R*PI PRINT A 今日の問題は別投稿にて。

すみません。まずRが何の数値を聞かれているのか分からないと思います。1行目にPRINT "えんのめんせきをこたえます" 2行目INPUT "えんのはんけいは";R と何を求めるかを表示するべきです。

»タバひめさん そうですね。プチコンを始めたばかりで知識がまだまだなんです;∀; 次回からは気をつけます。

あと、プチコンならかなり正確な円周率を返してくれる「PI()」という関数があるので、そちらを使った方が良いですね(^^)

otta777さん。 あ! そうだったぁ～!　POW関数もあったんだったあー!