[過去ログ]
【初心者】課題をクリアしていくスレ【講習会】 (787レス)
上
下
前
次
1-
新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
37
:
名前は開発中のものです。
[sage] 04/06/14 16:42
ID:9xiGisv8(1/2)
AA×
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
37: 名前は開発中のものです。 [sage] 04/06/14 16:42 ID:9xiGisv8 program Project1; {$APPTYPE CONSOLE} uses SysUtils; var I,N,F:Integer; begin Randomize; I := Random(9); Writeln('数字を入力してください'); while F = 0 do try Readln(N); if N = I then begin Writeln('正解です。Enterを押せば終了します。'); Readln; F := 1; end else if N > I then Writeln('もっと小さいです') else if N < I then Writeln('もっと大きいです'); Except Writeln('数字を入力してください'); end; end. こんなんでどうでしょう http://mevius.5ch.net/test/read.cgi/gamedev/1086858349/37
数字を入力してください 正解ですを押せば終了します もっと小さいです もっと大きいです 数字を入力してください こんなんでどうでしょう
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 750 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.028s