問題タブ [turbo-pascal]

Cでは、次のように1行で2つの変数を割り当てることができます

デルフィで

許可されていません。

では、 Delphi - Equivalent to C#'s ternary operator?で説明されているように、三項演算子IfThenの「代替」があります。要約すると、絶対に必要ではないようです。?:IfThen

したがって、次のようなものもあります。

「すべてをCのように見せる」ことを試みているわけではありません。同じ行で割り当ての右側をもう一度「再利用」するとよい場合があることに気付きました。(たとえば、Lazarus/Free Pascal: ブール式がパスごとに再割り当てされる while ループのコーディング スタイルを (無限ループの使用を回避するために) 改善する方法を参照してください。)

30 年以上前の Turbo Pascal プログラムを FireMonkey に変換しています。相当するものがないように見えるものの 1 つは、SOUND コマンドです。StackOverflow の他の場所で、Windows のビープ音 (VCL 内) に置き換えることができることを発見しましたが、Android の FireMonkey で機能するソリューションが必要です。私のプログラムは各サウンドと共に歌詞を表示するので、サウンドを録音して MP3 ファイルを再生するだけではいけません。また、Turbo Pascal の SOUND コマンドの不格好な 1 音 8 ビット サウンドを維持したいと考えています。主なコマンドはSound(Round(Frequency))です。FireMonkey でそれを模倣する方法はありますか? これが役立つ場合に備えて、各ノートを再生するための元のコードは次のとおりです。

もう少し背景を説明すると、これはテキスト アドベンチャー ゲームです。ジュークボックスのあるサロンがあります。ジュークボックスで曲を再生すると、曲の再生時に表示される歌詞から手がかりが得られます。

Succ/Prev 組み込み関数を型指定されたポインター型で使用できるようにする必要があるかどうか疑問に思います。Inc/Decと数学 (PointerVar+1と)のようにPointerVar-1。

• http://docwiki.embarcadero.com/Libraries/en/System.Succ
• http://www.freepascal.org/docs-html/rtl/system/succ.html

これらは、ポイントが一部にリストされていない「序数型」にのみ succ/pred を適用します。Pascal Report 1972 (スカラー型と呼んでいます) も同様です。

ただしhttp://www.gnu-pascal.de/gpc/Succ.html#Succは、「ポインターへの Succ の適用は Borland Pascal で定義されている」と主張しています。Pointers Math の結果として、これらの関数を除外することは合理的ではないようです。

この制限は言語的に実証されているのでしょうか、それとも単に実装上の問題なのでしょうか?

P: Pointer;PChar ではなく、変更された var タイプと比較するのは興味深いことです。

私はこのこと (Shannon-Fano アルゴリズム) をパスカルから c# に変換しようとしています:

そして、ここに私のC#のコードがあります:

しかし、残念なことに、私のコードは際限なくループし、次のようになり ます。私の間違いがどこにあるかを理解するのを手伝ってください。前もって感謝します。