パスカルでの文字列の反転方法

方法1: 文字列を配列に変換して反転させる方法

program ReverseString;
var
  str: string;
  i: Integer;
begin
  str := 'Hello World';

  for i := Length(str) downto 1 do
    Write(str[i]);

  Readln;
end.

この方法では、与えられた文字列を配列に変換し、配列の要素を逆順に表示します。

方法2: 文字列を一時的な変数を使用して反転させる方法

program ReverseString;
var
  str, reversedStr: string;
  i: Integer;
begin
  str := 'Hello World';
  reversedStr := '';

  for i := Length(str) downto 1 do
    reversedStr := reversedStr + str[i];

  Write(reversedStr);

  Readln;
end.

この方法では、一時的な変数 reversedStr を使用して文字列を逆順に結合します。

方法3: 文字列をポインタを使用して反転させる方法

program ReverseString;
var
  str, p: PChar;
begin
  str := 'Hello World';
  p := PChar(str) + Length(str) - 1;

  while p >= PChar(str) do
  begin
    Write(p^);
    Dec(p);
  end;

  Readln;
end.

この方法では、ポインタを使用して文字列を逆順に表示します。

これらはパスカルで文字列を反転させるいくつかの方法です。使いやすさやパフォーマンスなど、特定の要件に基づいて最適な方法を選択してください。