こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

回答受付中の質問

プログラミングBASIC言語について。

古い数学Bなのですが、簡単な問題と、数学Bの教科書に載っている用語の解説を、1通りしていただけないでしょうか?教えていただけると幸いなのですが。すみません。

投稿日時 - 2019-11-11 18:26:18

QNo.9677826

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(10)

ANo.10

> これを参考にして、作っていただきたいのです。教えていただけると幸いなのですが。
> すみません。813から819です。教えていただけると幸いなのですが。
> https://6900.teacup.com/cgu135/bbs
 813以外何もないけど。

 813のニュートン法のコード
 
100 DEF F(X) = X^3-K
110 DEF G(X) = 3*X^2
120 INPUT PROMPT "K =":K
130 LET A = K
140 LET B = A - F(A)/G(A)
150 IF ABS(A-B) > 10^6 THEN
160  LET A = B
170  GOTO 140
180 END IF
190 PRINT "近似解 = ";B
200 END

というコーディングは感心できません。これは大昔の Microsoft 系の BASIC、たとえば N88BASIC のスタイルです。
 私なら以下のようにします。

DEF F(X) = X^3 - K
DEF G(X) = 3*X^2
INPUT PROMPT "K =":K
LET X = K
DO
  LET B = X - F(X)/G(X)
  IF ABS((B-X)/X) < 10^6 THEN EXIT DO
  LET X = B
LOOP
PRINT "近似解 = ";B
END

 なお、プログラミングの勉強は本を読んだだけではものになりません。実際に BASIC が動くソフトが必要です。
私の回答もこれにて打ち切ります。

投稿日時 - 2019-11-15 10:46:10

ANo.9

> 他のプログラムを作っていただけないでしょうか?教えていただけると幸いなのですが。
> いくつかプログラムを作っていただきたいです。
 非常識なお願いです。ソフトを作成するには時間と労力がかかります。ソフトを作成する会社に相談して、お金を払って作ってもらってください。ただし、相談するときは「こういう目的のプログラムを作って欲しい」と明確に表現することです。

投稿日時 - 2019-11-14 15:39:22

お礼

すみません。814の間違いでした。

投稿日時 - 2019-11-14 16:04:47

ANo.8

訂正
> データ数を 20 と入力すると、1 から 99 までの乱数が、
> データ数を 20 と入力すると、1 から 100 までの乱数が、

投稿日時 - 2019-11-14 12:59:28

ANo.7

> なぜ、最後の行番号が500なのでしょうか?
 行番号は下に行くほど大きくなっていれば何でもいいのです。数B が採用していたのは Full Basic のようなので、ほんとうは行番号は使わない方がいいと思いますが、センター試験等では使っていたようです。

> 何のプログラムなのでしょうか?
 データ数を 20 と入力すると、1 から 99 までの乱数が、たとえば
  54 98 39 15 59 97 36 4 50 30 41 54 52 78 19 34 14 36 78 76
のように20個発生しますので、これを
  98 97 78 78 76 59 54 54 52 50 41 39 36 36 34 30 19 15 14 4
のように大きい順に並び替えるプログラムです。

> SWAP文は使わないでいただけないでしょうか?
 下記参照。しかし、なぜ?

100 INPUT "データ数を入力してください。",N
110 DIM X(N)
120 FOR I = 1 TO N
130  X(I) = INT(101*RND)
140 NEXT I
150 PRINT "ソート前のデータを出力します。"
160 FOR I = 1 TO N
170  PRINT X(I)
180 NEXT I
185 PRINT
190 FOR J=1 TO N-1
200  FOR K=J+1 TO N
210    IF X(J) >= X(K) THEN 230
220    TEMP = X(J)
222    X(J) = X(K)
225    X(K) = TEMP
230  NEXT K
240 NEXT J
250 PRINT "ソートしたデータを出力します。"
260 FOR I = 1 TO N
270   PRINT X(I)
280 NEXT I
500 END

投稿日時 - 2019-11-14 09:40:22

補足

できれば、DEF文を使って、プログラムから作り直していただけないでしょうか?後、STEP増分
も入れて作っていただきたいです。他のプログラムを作っていただけないでしょうか?教えていただけると幸いなのですが。いくつかプログラムを作っていただきたいです。お手数ですが、何のプログラムか書いていただけると幸いなのですが。すみません。教えていただけると幸いなのですが。

投稿日時 - 2019-11-14 13:58:42

ANo.6

下のコードはインデントが無視されていたので画像でアップ。

投稿日時 - 2019-11-12 20:31:50

補足

なぜ、最後の行番号が500なのでしょうか?何のプログラムなのでしょうか?教えていただけると幸いです。SWAP文は使わないでいただけないでしょうか?それ以外はいいので。(そのほか野茂は使ってもかまわないということです)すみません。

投稿日時 - 2019-11-14 00:32:50

ANo.5

一番単純な(しかし効率の悪い)ソートプログラム
十進BASICではMicrosoft BASIC互換モードで実行してください。
------------------------------------------------
100 INPUT "データ数を入力してください。",N
110 DIM X(N)
120 FOR I = 1 TO N
130 X(I) = INT(101*RND)
140 NEXT I
150 PRINT "ソート前のデータを出力します。"
160 FOR I = 1 TO N
170 PRINT X(I)
180 NEXT I
190 FOR J=1 TO N-1
200 FOR K=J+1 TO N
210 IF X(J) >= X(K) THEN 230
220 SWAP X(J),X(K)
230 NEXT K
240 NEXT J
250 PRINT "ソートしたデータを出力します。"
260 FOR I = 1 TO N
270 PRINT X(I)
280 NEXT I
500 END

投稿日時 - 2019-11-12 20:23:10

補足

これは、どういう意味となるのでしょうか?どんなブログラムなのでしょうか?数学Bで、BASIC言語は、これだけ覚えておけば、いいのでしょうか?あと、BASIC 言語の全ての用語を教えていただけると幸いなのですが。すみません。

投稿日時 - 2019-11-12 21:06:38

ANo.4

 21 世紀も 20 年が過ぎようとしている時代に、どうして昔のスタイルの BASIC にこだわるのかよくわかりませんが、Windows10 で動くフリーの BASIC に十進 BASIC があります。「十進 BASIC」で検索するとすぐ見つかります。
 十進 BASIC は行番号は不要ですが、昔の BASIC(N88 BASIC など)のように行番号をつけるコーディングも可能です。
 現在も開発中で、サンプルプログラムも豊富ですから、自分でコーディングしたプログラムの動作を確認しながら学ぶには最適だと思います。ネットには応用例もたくさんあります。

投稿日時 - 2019-11-12 05:09:56

補足

例えば、INPUT文や、DIM文が出てくるBASIC言語なのですが。教えていただけると幸いなのですが。URLを貼っていただけると幸いなのですが。すみません。

投稿日時 - 2019-11-12 10:20:39

ANo.3

であれば、「プログラミング言語 BASIC」でググってください。
いくらでも情報が得られるはずです。

投稿日時 - 2019-11-12 01:38:55

補足

では、それが載っているサイトのURLを教えていただけると幸いなのですが。すみません。探してもいいのが出てこなくて。

投稿日時 - 2019-11-12 01:55:59

お礼

もし、手持ちの資料で、BASIC言語の資料があるなら、写真を撮って貼っていただけると幸いなのですが。すみません。

投稿日時 - 2019-11-12 18:08:38

ANo.2

>数学Bとは数列、ベクトル、確率などを勉強します。
失礼しま~す。
現行の学習指導要領では、確率は数学Aで履修することになっています。

投稿日時 - 2019-11-12 00:57:23

補足

ですから、数学Bに載っているあなたが思いつく限りの、用語を(解説も含めて)教えていただけると幸いなのですが。すみません。

投稿日時 - 2019-11-12 01:25:34

ANo.1

 
数学Bとは数列、ベクトル、確率などを勉強します。
BASICはコンピュータを動かす言語の一つです。
 

投稿日時 - 2019-11-11 18:30:45

補足

昔の教科書に載っているのですが、解説していただけないでしょうか?

投稿日時 - 2019-11-11 19:36:07

あなたにオススメの質問