文字列を読み込み、書式化して表示

明解Ｃ言語 入門編 > 9. 文字列の基本 >

文字列を読み込み、書式化して表示

Delphi

program Project1;
{$APPTYPE CONSOLE}
uses

    SysUtils;
procedure main();

var

    str: String;

begin

    write('文字を入力してください：');

    read(str);
    Writeln(Format('%s', [str]));   (* そのまま *)

    Writeln(Format('%5s', [str]));  (* 最低５桁 *)

    Writeln(Format('%.3s', [str])); (* ３桁まで *)

    Writeln(Format('%8s', [str]));  (* 右詰め   *)

    Writeln(Format('%-8s', [str])); (* 左詰め   *)

end;
begin

    main;

end.

実行結果

S:\>lesson070\Project1.exe

文字を入力してください：ABCD

ABCD

 ABCD

ABC

    ABCD

ABCD