[過去ログ]
【初心者】課題をクリアしていくスレ【講習会】 (787レス)
【初心者】課題をクリアしていくスレ【講習会】 http://mevius.5ch.net/test/read.cgi/gamedev/1086858349/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
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
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 750 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.015s