私は文字列(パスカル)で動作するプログラムを持っています。最初の文字が文字でない場合、文字列を読み込んだ後、最初の文字が文字でない限り、すべての最初の文字を削除する必要があります。私はそれを何度も書こうとしましたが、常にすべての文字列を削除します。最初の文字が文字であるまで文字列から文字列を削除するには?
:プログラムは「123パーセント^ & ABC」を読み出す場合、結果は「ABC」ASCIIテーブル文字で は65..90からのものであり、97..122
からこれは私がどのくらいであるべきです
variables a: set of 65..90;
b: set of 97..122;
-------------------
bool:=false;
While (bool=false) do
begin
Writeln(s[1]);
If (Ord(s[1]) in a) or (Ord(s[1]) in b) then
begin
bool:=true;
end else
delete(s,1,1);
end;
なぜ機能しないのですか? この小さな手順で私を助けることができますか?ありがとうございました。
私はいくつかのPascalを行っていないので、しばらくお待ちしていますが、あなたのプログラムはうまくいくようですが、指定した文字列の出力を貼り付けることはできますか?または最終的にはエラー – krtek
また、いつものように、あなたの質問が本当の注目を集めるように、delphiタグを追加します! –
私はそのプログラムで間違いを見ません。私はそのスタイルが好きではありませんが、意図した通りには動作しない理由はありません。 – CodesInChaos