名前 題名 ▼ Mr.XRAYさん > ▼ DEKOさん > > > // Leap year? > > Writeln('Leap year?: ', TArray<string>.Create('No', 'Yes')[Ord(IsLeapYear(Year))]); > > なぬ !? > やってみたら確かに. > TArray<string>.Create('No', 'Yes') ?? > 要素の指定があると・・・ > > テストコードです.Delphi 10.3.3 Community です. > {$R *.dres} はプロジェクトのアイコン設定のリソースです. > > program Project1; > > {$APPTYPE CONSOLE} > > {$R *.dres} > > uses > SysUtils; > > begin > var Year : WORD := 2020; > Writeln('Leap year?: ', TArray<string>.Create('No', 'Yes')[Ord(IsLeapYear(Year))]); > Readln; > end. > GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link