- 締切済み
改行したいのですが
ＡＳＰ初心者です。 乱数を発生させ10個、表示させたいです。 ひとつ表示したら改行し、10行で表示するには どのようにしたらよいですか？ 下のソースだと10個並んででできてしまいます。 <% Do while x<10 x=x+1 Randomize Response.Write( CInt((Request.Form("max"))-CInt(Request.Form("min"))+1) * Rnd + CInt(Request.Form("min"))) loop %>
- taku620
- お礼率25% (2/8)
- Microsoft ASP
- 回答数2
- ありがとう数4
- みんなの回答 （2）
- 専門家の回答
関連するQ&A
- クイックソート
たびたびすいません。 この10個の乱数をクイックソートで表示するには どのようなソースを加えればよいでしょうか？ <% Do while x<10 x=x+1 Randomize Response.Write( CInt((Request.Form("max"))-CInt(Request.Form("min"))+1) * Rnd + CInt(Request.Form("min"))) Response.Write("<br>") loop %>
- 締切済み
- Microsoft ASP
- <TEXTAREA> 1行目の改行・・・。
HTMLのほうがよいかASPがよいか迷ったのですが 『.asp』ファイル上での話なので、とりあえずココへ 質問させていただきます・・・。 現在、<Form>タグを使って次画面へ値の受け渡しをしています。 その時、<TEXTAREA>タグに入力された内容を 次画面でも<TEXTAREA>に表示させています。(ReadOnlyで) 1行目にイキナリ改行をした場合に、次の画面では その改行が詰まった状態で表示されてしまいます。 例)入力フォームで [1行目] [2行目]あああ [3行目]いいいいい と入れた後、次の画面に行くと [1行目]あああ [2行目]いいいいい になってしまいます。 1行目の改行もそのまま表示させたいのですが、 何か特別なことをさせないとダメなのでしょうか？ (現在は特に何もしていません。Request.Formで拾ったものをそのまま表示させてます)
- ベストアンサー
- Microsoft ASP
- IF文 教えてください （BASIC）
1, 2, 3, 4 のいずれかの値を取る3つの乱数 x, y, z を同じ行に表示させ，さらに x=y=z=1 のときは「大当」， x=y=z≠1 のときは「当」， x, y, z のうち２つだけが一致したときは「惜」， 上記以外の場合は「残念」 と表示するプログラム ELSEIF文を用い，IF文およびEND IF文は1回で済ませる。 乱数x,y,zを表示することと IF文が分かりません。 RANDOMIZE FOR n=1 TO 3 PRINT INT （RND*4）+1; NEXT n
- ベストアンサー
- 情報工学
- 高精度乱数関数
rand()の値をRAND_MAX+1で割ると、[0, 1)の範囲になりますよね。 もし、RAND_MAX+1が2の乗数なら、浮動小数において結果は丸め誤差を含んでいないはずですよね。 unixのgccでコンパイルしたのですが、RAND_MAXの値は32767だったので、 #define (RM RAND_MAX + 1) #define RND ((long double)rand()) long double x; x = RND / RM + RND / RM / RM + RND / RM / RM / RM + RND / RM / RM / RM / RM ・ ・ ・; とすれば、精度の高い[0, 1)区間の乱数関数を作ることはできますか? この論理に間違いがあれば指摘してください。
- ベストアンサー
- C・C++・C#
- フォームの値をうまく出力できない
フォーム(1.htm)で、質問と答えと入力し、 その結果を次のページ(2.asp)で表示させるASPを作成しました。 以下のように作成したいのですが、うまくいきません。 どうしたらいいのでしょうか。 宜しくお願いします。 ・質問と答えは10個入力されるとはかぎらない ・例えば７個入力されたとき、question1からquestion7まで入力されるとはかぎらない（question2が空欄で、question9に入力される場合もある） ・どのように入力された場合でも、qとaの画像は、q1.gif・a1.gifから 連続で表示されるようにする。 ・フォームで入力されたところを上から順番にq1.gif～、a1.gif～の画像を使って、2.aspに表示させる。 ****1.htm***** <form method="POST" action="2.asp"> <input name="question1" type="text"> <input name="answer1" type="text"> … <input name="question10" type="text"> <input name="answer10" type="text"> </form> ****2.asp************ question1 = Request.Form("question1") answer1 = Request.Form("answer1") … question10 = Request.Form("question10") answer10 = Request.Form("answer10") Response.Write ("<table>") Response.Write ("<tr>") Response.Write ("<td><img src= q1.gif></td>") Response.Write ("<td>" & question1 & "</td>") Response.Write ("</tr>") Response.Write ("<tr>") Response.Write ("<td><img src= a1.gif></td>") Response.Write ("<td>" & answer1 & "</td>") Response.Write ("</tr>") … Response.Write ("<tr>") Response.Write ("<td><img src= q10.gif></td>") Response.Write ("<td>" & question10 & "</td>") Response.Write ("</tr>") Response.Write ("<tr>") Response.Write ("<td><img src= a10.gif></td>") Response.Write ("<td>" & answer10 & "</td>") Response.Write ("</tr>") Response.Write ("</table>")
- ベストアンサー
- Microsoft ASP
- 乱数で同じものが出ない処理ってどうやるんですか？
.NETでタイピングゲームを作っています。 乱数を使って日本語とそのローマ字を１セットとして表示していくプログラムなんですが、どうしても同じものが出てしまうのですが、同じ日本語とローマ字のセットが表示されないようにするにはどうすればよいでしょうか？ ちなみに、コード下記のように作りました。 Randomize() 乱数 = Math.Floor(Rnd() * 要素数) + 1 If 乱数 Mod 2 = 0 Then '乱数が偶数の時 Label1.Text = Typeword(乱数 - 1) '日本語表示 Label2.Text = Typeword(乱数) 'ローマ字表示 elseで、乱数が奇数の処理を行う。
- ベストアンサー
- Visual Basic
- 日付を操作したい
フォームで入力された日付に １０日を足して表示させたいと思っています。 2007/12/20と入力すると 2007/12/2010と表示されます。 2007/12/30と表示されるのはどうしたらいいのでしょうか。 よろしくおねがいします。 ***********1.htm********** <form> <input name="hiduke" file" type="text"> </form> ***********2.asp********** hiduke = Request.Form("hiduke") hiduke2 = hiduke + "10" Response.Write ("<p>" & hiduke2 & "</p>") ***********結果*********** 2007/12/2010
- ベストアンサー
- Microsoft ASP
- 配列を使ってクエリの値を変数にしたい
配列を使ってクエリの値を変数にしたいと考えていますが、 変数として見ず、文字列としてみているようです。 *********test.asp*************** kyoku1 = Request.Form("kyoku1") kyoku2 = Request.Form("kyoku2") kyoku3 = Request.Form("kyoku3") （kyoku1～3は前のページのフォームから値を持ってきています。） Dim k(2) Dim m(2) Dim jj jj = 0 k(0) = kyoku1 k(1) = kyoku2 k(2) = kyoku3 m(0) = kyokumei1 m(1) = kyokumei2 m(2) = kyokumei3 Set db=Server.CreateObject("ADODB.Connection") db.Provider = "Microsoft.Jet.OLEDB.4.0" db.ConnectionString = Server.MapPath("DB名") db.open Do While j < 3 Set rs = db.Execute("SELECT テーブル名.* FROM テーブル名 WHERE ((テーブル名.番号)='"&k(jj)&"')") m(0) = rs.Fields.Item("曲名") j = j + 1 jj = jj + 1 Loop Response.Write(" & kyokumei1 & ") Response.Write(" & kyokumei2 & ") Response.Write(" & kyokumei3 & ") 宜しくお願い致します。
- ベストアンサー
- Microsoft ASP
- jsp 改行コードで改行させて表示したい
はじめまして。 PostgreSQLから読み込んだ文字列データを表示させるtomcat+struts+servlet/jspを作成中です。 データの文字列に含まれる改行が、クライアントに表示された際に反映されず困っています。 過去ログも調べ、近い質問はありましたが、僕とは内容が微妙に違うようで、改めて質問させていただきました。 例えば、あるテーブルのある項目に、 A B C というデータ（A,Bそれぞれの後に改行のある3行の文字列）があるとします。 これを読み込みaction form bean（と言うのですか？setter/getterを定義する関数です）を介してjspに埋め込むと、できあがるhtmlでは、 ABC と改行されずに表示されます。 htmlで改行させるには「<BR>」が必要なのかと、データ文字列に0x0dや0x0a、または0x0d+0x0aがあれば「<BR>」に置き換えてaction form bean（？）のsetterに渡してjspを作ると、今度は、 A<BR>B<BR>C と「<BR>」が文字列として表示されます。 htmlをソース表示すると、「A<BR>B<BR>C」で、親切にも「<」「>」をそれぞれ「<」「>」に勝手に置き換えあくまで文字列として表示してくれるようです。 試しに改行コードを「<BR>」に置き換えても予想通りその部分は <BR> とそのまま表示され、そのソースは「&lt;BR&gt;」でした。 「<」や「<」等をそれぞれ「<」「&lt;」のように置き換える作業は、どこが行っているのでしょうか。 また、改行位置で改行させるにはどうすればよろしいでしょう。 OSはwindowsXPです。 無知ゆえに、つまらないことで悪戦苦闘しているのかも知れませんが、経験も浅くてよく解りません。 宜しくお願い致します。
- ベストアンサー
- Java
- 正規分布するプログラムを教えてください。
正規分布する乱数プログラムを作りたいのですが、うまく作れません・・。 プログラムソースは長くなりますので見ていただかなくても結構なのですが、下記のようなプログラムを実行したところ、実行結果下記になり、正規分布にはなりませんでした・・。 色々ネットで調べたものの理解できないのでどなたか教えていただけないでしょうか＞＜ 正規分布を利用して、例えば50～100位の間に分布する乱数を生成したりしたいのです。。。 #include <math.h> #include <time.h> #include <stdlib.h> #include <stdio.h> #define PI 3.14159265358979323846264 double p_nor(){ double rnd,t,u,r1,r2; rnd=rand()%10000/10000.0; t=sqrt(-2.0 * log(1-rnd)); u=2*PI*rnd; r1=t*sin(u); return r1; } int main(){ int i,bunpu[30]={}; double p,min=0,max=0,total=0; srand((unsigned)time(NULL)); for(i=0;i<100000;i++){ p=p_nor(); for(int j=0;j<30;j++){ if(p>-2.0+0.1*j && p<=-1.9+0.1*j) bunpu[j]++; } if(min>p)min=p; if(max<p)max=p; total+=p; } printf("min:%f max%f 平均%f\n",min,max,total/100000); for(int j=0;j<30;j++){ for(i=0;i<bunpu[j]/200;i++){ printf("*"); } printf("\n"); } return 0; } 実行結果 min:-1.711381 max0.803275 平均-0.247841 **************** ************************************ ******************** **************** ************** ************ *********** ********** ********** ********* ********* ******** ******** ******** ******** ******** ******** ******** ************************************* ************************* *********************** *********************** ************************ **************************** ******************************** **************************************************************** ***********
- ベストアンサー
- C・C++・C#
お礼
できました。ありがとうございます。