[過去ログ] 【初心者】課題をクリアしていくスレ【講習会】 (787レス)
上下前次1-新
抽出解除 必死チェッカー(本家) (べ) 自ID レス栞 あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
258: 名前は開発中のものです。 [] 04/07/06 02:29 ID:pkSoPn0/(1/5) AAS
Delphi エラトステネスの篩
外部リンク[zip]:gamdev.org
261: 名前は開発中のものです。 [] 04/07/06 16:54 ID:pkSoPn0/(2/5) AAS
C#で素数
static void Main(string[] args)
{
int sosuCount=0;
for (int i = 2; sosuCount<1000; i++)
{
Boolean nososu;
nososu = false;
for (int j = 2; j < i ; j++)
{
if ((i % j) == 0)
{
nososu = true;
break;
}
}
if (!nososu)
{
Console.WriteLine(i);
sosuCount++;
}
}
Console.WriteLine(sosuCount + "個の素数を発見しました");
}
263: 名前は開発中のものです。 [] 04/07/06 18:09 ID:pkSoPn0/(3/5) AAS
//PHPで素数
<?php
for ($i=2; $sosuCount<1000; $i++)
{
$nososu=false;
for ($j=2; $j<$i; $j++)
{
if (($i % $j) == 0)
{
$nososu=true;
break;
}
}
if (!$nososu)
{
echo $i;
echo "\n";
$sosuCount++;
}
}
echo $sosuCount + "個の素数を発見しました";
?>
264: 名前は開発中のものです。 [] 04/07/06 18:57 ID:pkSoPn0/(4/5) AAS
#Pythonで素数
sosuCount=0
i=2
while sosuCount<1000:
nososu=False
j=2
while j<i:
if ((i % j) == 0):
nososu=True
j=99999
break
j=j+1
if (not nososu):
print i
sosuCount=sosuCount+1
i=i+1
print sosuCount
print "個の素数を発見しました"
275(1): 名前は開発中のものです。 [sage] 04/07/06 23:53 ID:pkSoPn0/(5/5) AAS
//HSPヘルプではincludeするのはhspext.hsになってますがhspext.asじゃないと動きません
//なぜ?(´・ω・`)
//
//平方根の求め方
//
//HSP2.61で動作確認しますた
//
#include "hspext.as"
//100の平方根を求めます
i=100
//iの平方根を固定少数点型でjに代入
emsqr j,i
//jの値を整数型にキャスト(少数点以下切り捨て)
j=j>>44(10): 受験生 ◆3VUXqvbfSY [age] 04/06/10 23:09 ID:aWWFz+nO(1) AAS
言語が解んなきゃ、出しようがないが…
C++ > ウィンドウを作ってみましょう。
VS.NET +VB > ビットマップでも読んでみましょう。
JAVA > …微妙…
//jを表示
print j
stop
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.021s