プチコンまとめWiki (初代/mkII)

Toukou/素数を探すプログラム の変更点


#title(投稿プログラム : 素数検索)
#contents
/////////////////////////////////
// 投稿年月日は今日の日付を入力してください。
// この日付は、将来的に投稿プログラムを年月日順に整理するさいに使用されます。
// また、適当にタグをつけることができます。半角のコンマ区切りで複数つけられます。
// タグをつけると、同じタグが付いたページを検索することができます。

2011年12月20日投稿
/ 投稿者 : 名無しさん
/ &tag(投稿プログラム,1画面プログラム,初代対応,QRコード,実用ツール);

/////////////////////////////////
// ここに概要とか書きます。
// [#英数字] はページ内リンクに使用できますが、消してもかまいません。
// (自動でランダムな文字列が再付与されます)

* 概要 [#g25211b5]
素数を探し出すプログラムです。


/////////////////////////////////

* スクリーンショット・動画 [#e411ab30]
動作しているところを撮影した写真や動画があれば貼り付けてください。

// ページを作成すると、画像の添付ができるようになります。(作成する前はできません)
// 画像を添付したら、以下の書式でページ内に貼り付けられます。
// #ref(添付ファイル名)

// 以下の書式で、YouTube やニコニコ動画を貼り付けられます。
// #youtube(0HWX7kovgY8)
// #nicovideo(sm13684820)

/////////////////////////////////
* QR コード [#QR]
プチコンmkII 向けの QR コードです。

#ref(qr0.png,,200%)

* プログラムリスト [#c662ffe4]
#basic{{
CLS:VISIBLE 1,1,0,0,0,0
CLEAR:INPUT"ドコマデサガシマスカ";M
A=1S=2FOR I=0TO 1I=0A=A+1
R=S>M:IF R THEN?C"コミツケタヨ":END
R=A>S/A:C$=STR$(S)+","
IF CSRX+LEN(C$)>32THEN?
IF R THEN A=1?S",";:C=C+1
IF R THEN S=S+1NEXT
R=S/A%1==0 AND S/A!=0
IF R THEN A=1S=S+1
NEXT
}}

/////////////////////////////////
// コメントを募集したくないなら、ここから下は削除してください

* CHECKER FLAG (ひとことコメント) [#f43e4a8c]
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は[[掲示板>Board]]へ)
- ''名無しさん'' : 僕も作ったなあ (&new{2012/07/17 (火) 20:08:53};)
- ''Lv100'' : これは一時間あれば作れる。 (&new{2012/07/17 (火) 20:13:52};)
- ''nao sato'' : 俺も作ってみた。(2~1000の素数を使ってまーす。) (&new{2013/02/06 (水) 21:10:10};)
- ''名無しさん'' : こっちはOverfrowまでダっけ? (&new{2013/02/06 (水) 21:41:18};)
- ''名無しさん'' : まあ、そうなるわな (&new{2013/02/06 (水) 22:34:41};)

#comment

表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.005 秒 | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30