WHILE
をテンプレートにして作成
[
ホーム
|
一覧
|
検索
|
最終更新
|
ヘルプ
] [
新規
]
VWRR
・
WIKIBOX
建築mome
・
メーカー
最新の40件
2018-07-17
VectorScript
2013-05-25
例題の解説
2011-12-09
ΔｘΔｙ
GetLine
Distance
Num2Str
2011-12-08
寸法変倍
MenuBar
日付スタンプ
Date
面積スタンプ
2011-12-07
HArea
Num2StrF
TextOrigin
GetPt
FSActLayer
FActLayer
Concat
BeginText
EndText
図面の中を検索
ReDraw
MoveObjs
GetKeyDown
ClrMessage
Message
Y方向複製
2011-12-06
キー入力
ダイアログ
2011-12-04
図形の整列
2011-11-26
属性を設定する
Locus
変数
Oval
識別子
定数
基本型
言語仕様
制御命令
IF
total:
0
today:
0
yesterday:
0
now:
1
開始行:
**WHILEループ文 [#y7323fda]
WHILEループ文を使うと、条件を満たしている間はいくつかの行...
ループの流れ
&ref(loop02.jpg,,50%);
WHILEループ文は以下のように書きます。
WHILE 条件式 DO
文；
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
i:=i+1; {iに1を加える}
END;
Run(TEST);
FORループ文に似ていますが、ループの打ち切りに回数ではなく...
最初に判断しているので、条件によってはループの中の処理を...
''［文が複数行ある場合］''
文が複数行ある場合は BEGINとENDでくくります。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
FOR i:=5 TO 10 DO
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
BEGIN
Writeln(i);
i:=i+1; {iに1を加える}
END;
END;
Run(TEST);
''［グループ内での注意］''
WHILEループ文を使う上で注意することは、無限ループです。
条件式が真のまま変化しないプログラムを書くと、ループを抜...
無限ループの例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
BEGIN
Writeln(i);
END;
END;
Run(TEST);
iの値を加算していないので、iの値はいつまでも0のままです。
従って条件式がいつまでも真のままになり、無限ループになり...
条件式に使っている変数の扱いには十分気を付けて下さい。
無限ループになったら、ctriキー(Macの場合はcommandキー)と...
プログラムを強制的に終了させることができます。
ただし、プログラムによっては終了できないときがあります。
終了行:
**WHILEループ文 [#y7323fda]
WHILEループ文を使うと、条件を満たしている間はいくつかの行...
ループの流れ
&ref(loop02.jpg,,50%);
WHILEループ文は以下のように書きます。
WHILE 条件式 DO
文；
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
i:=i+1; {iに1を加える}
END;
Run(TEST);
FORループ文に似ていますが、ループの打ち切りに回数ではなく...
最初に判断しているので、条件によってはループの中の処理を...
''［文が複数行ある場合］''
文が複数行ある場合は BEGINとENDでくくります。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
FOR i:=5 TO 10 DO
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
BEGIN
Writeln(i);
i:=i+1; {iに1を加える}
END;
END;
Run(TEST);
''［グループ内での注意］''
WHILEループ文を使う上で注意することは、無限ループです。
条件式が真のまま変化しないプログラムを書くと、ループを抜...
無限ループの例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
i:=0; {iを初期化する}
WHILEi<=10 DO { i が10以下ならループを続け、文を実行...
BEGIN
Writeln(i);
END;
END;
Run(TEST);
iの値を加算していないので、iの値はいつまでも0のままです。
従って条件式がいつまでも真のままになり、無限ループになり...
条件式に使っている変数の扱いには十分気を付けて下さい。
無限ループになったら、ctriキー(Macの場合はcommandキー)と...
プログラムを強制的に終了させることができます。
ただし、プログラムによっては終了できないときがあります。
ページ名:
![[PukiWiki Plus!]](image/pukiwiki.plus_logo.png "[PukiWiki Plus!]"){kind=logo}
