FOR
をテンプレートにして作成
[
ホーム
|
一覧
|
検索
|
最終更新
|
ヘルプ
] [
新規
]
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:
2
開始行:
**FORループ文 [#t150a56c]
FORループ文を使うと、いくつかの行を一定の回数だけ繰り返さ...
ループの流れ
&ref(loop01.jpg,,50%);
FORループ文は以下のように書きます。
FOR 変数:=初期値 TO 終了値 DO
文；
※変数は INTEGER型でなければいけません。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
Writeln(i);
END;
Run(TEST);
''［文が複数行ある場合］''
文が複数行ある場合は BEGINとENDでくくります。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
BEGIN
Writeln(i);
Writeln(i*2);
Writeln(i*4);
END;
END;
Run(TEST);
''［グループ内での注意］''
ループ中の文でカウンタ変数の値を変更してはいけません。
プログラムが正常に動かない可能性があります。
悪い例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
BEGIN
Writeln(i);
i:=i-1; {カウンター変数の値を変更している}
END;
END;
Run(TEST);
また初期値と終了値のいずれにもカウンタ変数を含めてはいけ...
悪い例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO i DO {終了時にカウンター変数を使っている}
Writeln(i);
END;
Run(TEST);
終了行:
**FORループ文 [#t150a56c]
FORループ文を使うと、いくつかの行を一定の回数だけ繰り返さ...
ループの流れ
&ref(loop01.jpg,,50%);
FORループ文は以下のように書きます。
FOR 変数:=初期値 TO 終了値 DO
文；
※変数は INTEGER型でなければいけません。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
Writeln(i);
END;
Run(TEST);
''［文が複数行ある場合］''
文が複数行ある場合は BEGINとENDでくくります。
例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
BEGIN
Writeln(i);
Writeln(i*2);
Writeln(i*4);
END;
END;
Run(TEST);
''［グループ内での注意］''
ループ中の文でカウンタ変数の値を変更してはいけません。
プログラムが正常に動かない可能性があります。
悪い例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO 10 DO
BEGIN
Writeln(i);
i:=i-1; {カウンター変数の値を変更している}
END;
END;
Run(TEST);
また初期値と終了値のいずれにもカウンタ変数を含めてはいけ...
悪い例
PROCEDURE TEST;
VAR
i:INTEGER;
BEGIN
FOR i:=5 TO i DO {終了時にカウンター変数を使っている}
Writeln(i);
END;
Run(TEST);
ページ名:
![[PukiWiki Plus!]](image/pukiwiki.plus_logo.png "[PukiWiki Plus!]"){kind=logo}
