- はやませんせーの所で知ったキミならどう書く 2.0 - 100までの整数から素数を列挙せよL.L.Ring
…コードは書いていたのだけれど日記に書くヒマ無かったので、遅ればせながら晒してみるテスト。
（Win2Kのコマンドプロンプト上で確認しました。画面は後ほど上げます）
@echo off
IF NOT "%1"=="" GOTO %1
CMD /V /C %0 MAINSTEP
GOTO EOF
:MAINSTEP
SET sosuu=
FOR /L %%a IN (1,1,100) DO ( SET num=%%a & CALL :IDENTIFY)
ECHO %sosuu%
GOTO EOF
:IDENTIFY
SET yakusuu=0
SET amari=0
FOR /L %%j IN (1,1,%num%) DO ( SET /A amari=%num%%%%%j & IF !amari!==0 SET /A yakusuu=!yakusuu!+1 )
IF %yakusuu%==2 SET sosuu=%sosuu%%num%
GOTO EOF
:EOF
＃ってーかコレ、言語って何と言えばいいんだろ…コマンドプロンプト言語！？（汗）
|
