challenge コマンドライン引数の取得

以下にけだし同感なので。

inferno :: どう書く?orgは多言語クックブックになれるか > 一般投稿が可になった時に、ちょっと感じてたんですがやっぱり最近ある傾向が顕著で。というのは数学パズル系とか、(数学的な、事務処理などではない)アルゴリズム勝負!なお題ばっかりなんですよね。

というわけで、たまには簡単でその場で答えが出て、なによりある言語使いにとって「外国語」ではこういうんだというのがわかる問題として考えてみました。

% program a b c d

で a, b, c, d を得るにはどうしたらよいかという、それこそネイティブには刺身タンポポより簡単だけど、「外国人」にはとっさに浮かばないという問題です。

Dan the Practical Programmer

Posted feedbacks - Delphi

ParamCount関数でパラメータの個数を得られます。
ParamStr関数でパラメータ文字列を取得できます。
ParamStr(0)には起動したプログラムのパスが入ります。
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
program arguments;

{$APPTYPE CONSOLE}

var
  i: Integer;
begin
  for i := 1 to ParamCount do
  begin
    Write(ParamStr(i) + ' ');
  end;
  // => a b c d
end.

Index

Feed

Other

Link

Pathtraq

loading...