A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
ええと、あくまで「参考意見」です。
見たところ、問題の質から言うとBASICで書くには長くなっちゃって辛い問題なんじゃないかな、と言う気がします。平たく言うとBASIC向きじゃないんじゃないか、と。
プログラミング初心者、との事ですが、「問題に依っては言語には向き/不向きがある」って場合があるんですよね。
恐らくCommon Lispの方が簡単に書けるんじゃないか、と思って書いてみたらやっぱその通りのようです。8行程度で簡単に実装出来ますね。
次にCommon Lispでのソースコードを載せておきます。参考にして下さい。
;;ここから
(defun QNo.3571398 ()
(let ((msg "データを入力して下さい>"));プロンプトのメッセージ
(labels ((loop (prompt a ls);局所関数loopを定義
(if (zerop a);脱出条件
(values (length ls);リストの長さ
(sort ls #'<));リストのソート
(loop (format t msg) (read) (cons a ls)))))
(loop (format t msg) (read) nil))))
;;ここまで
多分、次のような動作をさせたいんじゃないか、と思います。上のソースをCommon Lisp(例えばClispと言うフリーウェア)で走らせると以下のようになります。要求に合ってますか?
;;実行例
[1]> (QNo.3571398)
データを入力して下さい>3
データを入力して下さい>5
データを入力して下さい>7
データを入力して下さい>1
データを入力して下さい>3
データを入力して下さい>9
データを入力して下さい>8
データを入力して下さい>0
7 ;
(1 3 3 5 7 8 9)
;;お終い
Common Lispの場合は「多値関数」と言う機能があって、これによりリスト(Basicで言う配列の一種)の長さとソート済みのリストの結果を同時に返す事が出来ます。上で言うと「長さ」が「7」でソート済みのリストが(1 3 3 5 7 8 9)って事ですね。
まあ、プロンプトを自作/表示するかどうかは好みの問題ですし、僕はBASICは良く分からないのですが、原則、入力に用いる「変数」と「配列」を別々に設定し、if~then構文を使って、変数に0を代入された時にループを脱出して結果表示、そうじゃなかったら変数に「データを読み込み」、そして前回の変数を配列にどんどん突っ込んでいけば良いとは思います。
また、繰り返し計算のDo~Loop構文を使えばBasicでも何とかなるかもしれません(Common Lispのソースでは再帰を用いています)。
ただし、Common Lispのソースコード内ではリストの長さを調べるlength関数とリストの要素を並べ替えるsort関数を用いましたが、Basicで似たようなライブラリが無いと、実装はかなり難しいかもしれません。
No.2
- 回答日時:
命令コードは覚えていないので雰囲気で
データの個数の予想しえる最大値を100と過程
変数 A(0)からA(99)、Asort(0)から
DIM Ain'入力
DIM AA(100)'データin
DIM B'要素番号
DIM Asort(100)'データout(ソート)
DIM C'要素番号
DIM N'データの個数
N=0
'入力AA(B) 0入力まで
FOR B=0 TO 99
INPUT "数値入力="; Ain
IF val(Ain)=0 THEN B=99 ELSE A(B)=val(Ain):N=N+1
NEXT
PRINT N
IF N=0 THEN END'入力なしなら終了
'入力A(B)ソート⇒Asort(C)
FOR C=0 TO N-1
FOR B=0 TO N-1
IF A(B)<>0 and A(B)<Asort(C) THEN Asort(C)=A(B):A(B)=0
NEXT
NEXT
'出力印字
FOR C=0 TO N-1
PRINT Asort(C)'入力の小さい順に印字
NEXT
END
No.1
- 回答日時:
データーが入力されると
Aが0かどうか判断する
Aが0以外ならカウンターを1追加
最初に戻る
Aが0なら終了処理
並び替える=ソートと言う
http://www.ics.kagoshima-u.ac.jp/~fuchida/edu/al …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- C言語・C++・C# このプログラミングの問題を教えてほしいです。 キーボードからデータ数nとn個のデータを入力し、平均値 3 2022/12/19 22:51
- Excel(エクセル) 結合セルのソートについて 5 2022/04/22 11:57
- C言語・C++・C# C言語プログラム変更 2 2022/12/21 15:03
- JavaScript json形式データのデータ連携について 4 2022/04/05 23:01
- 数学 【 数I 分散 】 3 2023/02/26 21:55
- C言語・C++・C# [C言語] コメント文字列を無視して、数値データを読み込むプログラム部分について 5 2022/10/05 11:03
- Excel(エクセル) VBAのoffsetの動き方について教えてください 3 2022/11/25 23:36
- C言語・C++・C# 至急お願いします。プログラミングの問題です。 malloc 関数を使って教えてください。 入出力例1 3 2022/07/21 09:36
- C言語・C++・C# このプログラミングの問題を教えて欲しいです。 キーボードから整数kを入力し、kが配列aの中に何個存在 2 2022/12/19 22:50
- その他(プログラミング・Web制作) プログラミング Python 1 2022/09/28 05:02
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
教えて下さい
-
【エクセル】測定時間がバラバ...
-
Accessで該当データにフラグを...
-
配列でデータが入っている要素...
-
ActiveReportについて
-
エクセルで2つの時系列のデー...
-
ユーザーフォームのテキストボ...
-
VBA 該当データがない時 ...
-
多量のSUMIF式を軽くしたい
-
Excelのマクロでワードのテキス...
-
子ダイアログのデータを親ダイ...
-
Fortran カンマを含む数値デー...
-
パースとはなんですか?
-
Excelで、標準偏差の関数
-
S9タイプからXタイプにデータ...
-
VBA 空白セルを削除ではない方...
-
CString型の文字列連結について
-
EXCEL VBA FREQUENCY関数での...
-
阿武町4630万円誤送金事件。町...
-
COBOL数値転記をCOPY句内での仕様
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
【エクセル】測定時間がバラバ...
-
メモ帳(テキストデータ)をExc...
-
VBA 空白セルを削除ではない方...
-
多量のSUMIF式を軽くしたい
-
Excelのマクロでワードのテキス...
-
エクセルで2つの時系列のデー...
-
この行は既に別のテーブルに属...
-
VBAを使ってOutlookメール本文...
-
シーケンサにパソコンからアク...
-
EXCELVBAでSQLserverからデータ...
-
ブレーカー落ちで壊れたりしな...
-
[C言語] コメント文字列を無視...
-
オープンチヤットでデータ削除...
-
モジュラス103の算出方法について
-
javaでDBからデータを取ってき...
-
カンマからスラッシュに
-
VBA 毎日取得するデータを順番...
-
Android携帯をUSBメモリ代わりに
おすすめ情報