問題タブ [turbo-pascal]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票する
1 に答える
89 参照

turbo-pascal - Turbo Pascal、ストリームを使用して Writeln をキャプチャしますか?

レガシー TP5 プログラムを持っています。TP7を使用してコンパイルおよび実行できます。write / writeln ステートメントの一部をキャプチャしてログに記録したいと思います。write と writeln に対してグローバルな検索と置換を行うことができるので、そのようなコードの変更は気にしません。フォーマットされた出力 write(r:4:2) を使用するので、それを保持したいと思います。

ファイルに書き込み、次に各行を読み込んで再度書き込む以外に write/writeln をキャプチャする方法を知りません :~( しかし、それはストリームへの書き込みに非常に似ていることに気づきました (Tp5. 5) 次に、コピーを複数の出力にストリーミングします。

誰もこれを以前にやったことがありますか?出来ますか?別の方法はありますか?

0 投票する
2 に答える
642 参照

algorithm - ヤッツィー 3 オブ ア カインド

これが私の状況です。私は現在、Lazarus IDE で Turbo Pascal 言語を使用してYahtzee ゲームを作成しており、開発のスコアリング側まで進んでいます。スコアリングの下位セクションをすでに完了しており、上位セクションを開始していますが、必要ですスリーオブアキンドをチェックする手順を書くのに役立ついくつかの助けがあります。私の最初の考えは、配列を使用してサイコロの値の乱数をロードし、ループ関数を使用して3つの等しい数をチェックすることでしたが、あまり自信がありませんこのエリアの中では。助けてもらえますか?私はコードを求めているわけではありませんが、それは役に立ちますが、正しい方向へのプッシュだけです。

私のサイコロ整数値変数は、「Dice1」、「Dice2」、「Dice3」、「Dice4」、「Dice5」、「Dice6」です。

0 投票する
0 に答える
234 参照

nan - Turbo Pascal は、浮動小数点変数の Nan および INF 値を処理します

Not A Number 値を含むバイナリ データ ファイルを生成する Turbo Pascal 5.5 プログラムがあります。Turbo Pascal 5.5 を使用して、データ ファイルを正しくインポートできます。しかし、テスト時に範囲チェックエラーが発生した場合

もちろん、範囲チェックをオフにすることもできますが、それでも NaN 値と INF 値を識別して別の形式に変換する必要があります。

Turbo Pascal 5.5 で NaN 値を識別する Borland/Turbo Pascal メソッドはありますか? または、数値を LongInt にマップしてビット値を確認する必要がありますか?

0 投票する
2 に答える
3030 参照

turbo-pascal - グラフユニットを使用してイメージを Turbo Pascal にロードする方法

単一のビットイメージを Pascal プログラムにロードする必要があります。それを行う方法はありますか、それともピクセルごとに描画する必要がありますか?

0 投票する
1 に答える
519 参照

pascal - 各行の最大値

質問があります。各行に最大要素を記述する必要があります。たとえば、私のテーブル:

試した4,8,12を取得したいのですが、結果がありません:

私が終わるのを手伝ってください。

0 投票する
1 に答える
2344 参照

pascal - Turbo Pascal 5.5 の「エラー 3: 不明な識別子」と ASM キーワード

TP 5.5 をダウンロードし、FreeDOS を実行している仮想マシンにインストールしました。

この短いコードを試しました:

Turbo Pascal は、「エラー 3: 不明な識別子」と言います。

キーワード inline works を使用できますが、ニーモニックを使用することはできません。私の目標は、リアル モードでアセンブリを学習することだけなので、Delphi に行ってそこでニーモニックを使用することはできません。

0 投票する
2 に答える
138 参照

pascal - パスカルで特定の数値をランダム化する確率を挿入する方法

私は最近、プログラム (テキストベースのゲーム) を書こうとしていますが、いくつかのコマンドしか知らず、すべてのコマンドをよく理解していません。

私がやろうとしているのはヒットチャンスです。プログラムに

  • 90% の確率で 1 番 (ヒットを意味する) を選択し、
  • 10% で番号 0 を選択します (つまり、ミスを意味します)。

同じ質問 Hereを見ました が、コマンドを使用したことがないため、コマンドを理解できません ( set.seedsampleについて話している)。誰かが私にそれらがどのように機能するか説明できますか? 別の方法はありますか(より理解しやすいですか?より多くのリソースを消費してもかまいません)

0 投票する
2 に答える
674 参照

pascal - Pascal プログラムを実行してループに陥った後、DOS 画面を閉じるにはどうすればよいですか?

私がパスカルプログラムを作ったとしましょう。プログラムを保存しておらず、誤ってループを作成したとしましょう。プログラムを実行しましたが、DOS 実行画面でループしてしまいました。Alt+なしで抜け出すにはどうすればよいF4ですか? 私が使用しているプログラムは Turbo Pascal です。