1998-10-10から1日間の記事一覧
明解Ｃ言語 入門編 > 5. 配列 > 素数を求める (ver.2) Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils; var i, j, k, no: Integer; counter: Integer = 0; begin no := 2; writeln(format('%d', [no])); { 素数 } for k := 1 to 14 do begin no :…
明解Ｃ言語 入門編 > 5. 配列 > 素数を求める (ver.2) Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils; var i, j, k, no: Integer; counter: Integer = 0; begin no := 2; writeln(format('%d', [no])); { 素数 } for k := 1 to 14 do begin no :…
