1998-10-13から1日間の記事一覧

素数を求める (ver.5)

明解C言語 入門編 > 5. 配列 > 素数を求める (ver.5) Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils; var i, j, no: Integer; prime: array[0..14] of Integer; ptr: Integer = 0; counter: Integer = 0; begin prime[ptr] := 2; inc(ptr); pri…