pascal

    -1

    1答えて

    ファイルから255文字を超える行をパスカル単位で読み込もうとしています。私はそれをcharでchar型で読むことは許されません。私はfree pascal compilerの標準設定に接着しています。 これを達成するにはどうすればよいですか?それも可能ですか?私はblockreadを使うことについていくつかのヒントを読んだが、どのように手がかりを得るためにそれについての十分な情報を見つけることがで

    0

    1答えて

    をマークとしてキリル文字列が現れる:今 function CmdLineParamExists(const Value: string): Boolean; var I: Integer; begin Result := False; for I := 1 to ParamCount do begin if CompareText(Copy(P

    -1

    1答えて

    私はパスカル(freepascal)で何かを定義しようとしています。あなたはパスカルでそれを行うことができますどのように #define REP(i,k) for(int i=0; i<k; i++) : は、C++のように、あなたは、変数は、このようなマクロを定義渡すことができますか? 私は{$MACRO ON}コマンドを最初の行に追加しました。その結果、通常の定義をエラーなしで実行すること

    -3

    1答えて

    私はこのコードの助けが必要です。私はパスカルを知らない。しかし、私はパスカルでコードを書く必要があります。私は試した。しかし、いくつかのエラーがあります。誰かが私を助けることができますか? Program Arrayexamp(output); Var counter,index,input: Integer; A: Array[1..15] of Integer;

    1

    1答えて

    こんにちは私は、3桁の月の略語と1日のファイル入力を読み込むタスクを与えられています。それぞれのユリウス日を計算する必要があります) 2つのINTEGERSを追加しても、エラー201(互換性のないデータ型)が発生します。私は新しいプログラムを作ろうとしていましたが、それを動作させましたが、それを私の既存のコードに実装すると、もう動作しません。これは非常にイライラしています。助けてください。私はこの

    1

    3答えて

    パスカルプログラムから、そのファイルタイプのデフォルトプログラムを使ってファイル(音楽ファイル)を開く必要があります。これまでのところ私はそれを行うための最善の方法は、コマンドを実行するコマンドラインを使用するだろうと思う: open C:/Users/defaultuser0/Music/filename.wav が、私はパスカルの中から何かをするcmdを伝えるするかどうかはわかりません。

    0

    1答えて

    私は、ユーザーがアルバムの名前、ジャンル、アーティストなどを入力し、4つのメニューオプションでアルバムを表示、再生、更新できるパスカルテキストプログラムを作成しようとしています。しかし、私は最初のメニュー(新しいアルバムを追加するためのメニュー)に入るときに問題を抱えているだけで、メインメニューを再印刷します。私は崇高なテキストエディタとMingwをターミナルとして使用しています。ここにコードがあ

    2

    1答えて

    私はDelphiでWindows DLLを使用しています。機能がうまく割り当てられているかどうかを確認する必要があります。 私はこのような属性はクラスで私のDLL関数を置くために、関数の型を宣言した: @Self.m_MPOS_OpenResource := GetProcAddress(libHandler, '[email protected]'); @Self.m_MPOS_CloseRe

    1

    1答えて

    私は現在、10秒以内にクリック数をカウントし、2つの異なるファイルから名前とスコアを読み込み、別のフォームでさまざまな種類の名前とスコアを表示する簡単なアプリケーションを開発中です。しかし、ゲームが終了した後、 'ゲームオーバー!'メッセージが表示され、リーダーボードフォームが表示されますが、ボタンがなく、不思議そうに見えて、プログラムがクラッシュするようです。 これは、フォームがどのように見える

    -7

    3答えて

    これはコードです: program pi18; var a,b,c,P:real; begin read(a,b,c); if(a+b<c) or (b+c<a) or (a+c<b) then writeln('Nu exista asa triunghi') else begin P:=a+b+c; if(a=