Компьютерные технологии в физике. Часть 1. Компьютерное моделирование физических процессов. Красов В.И - 17 стр.

UptoLike

20
Инструкция
;
end;
В этом случае на каждом шаге значение счетчика уменьшается. Не-
обходимо отметить, что в качестве счетчика могут использоваться пере-
менные символьного и интервального типа.
Пример использования for - цикла для вывода на экран графика
функции y=sin(x):
………………………………………..
for I:=0 to PaintBox1.Width do
begin
Y:=Round(100*Sin(I/20));
PaintBox1.Canvas.Pixels[I,Y]:=clAqua;
end;
………………………………………...
6) Циклы с предусловием. Здесь набор инструкций повторятся до тех пор,
пока выполняется некоторое условие. В качестве условия используется ло-
гическое выражение. Проверка условия происходит перед тем, как выпол-
няется следующий шаг. Если значение логического выражения равно true
("истина"), продолжается выполнение цикла, если false ("ложь"), цикл
заканчивается. Общий вид инструкции:
while
логическое выражение
do
begin
Инструкция;
……………………….
Инструкция;
end;
Пример использования цикла с предусловием
……………………………………
with Image1 do
while ((X>0) and (X<Width)) and ((Y>0) and (Y<Height)) do
begin
EField(x,y);
X:=X+dl*Ex/E;
Y:=Y+dl*Ey/E;
Canvas.Pixels[Round(X),Round(Y)]:=clLime;
Refresh;
end;
……………………………………..
PDF created with FinePrint pdfFactory Pro trial version http://www.fineprint.com
                     Инструкция;
                  end;

                     В этом случае на каждом шаге значение счетчика уменьшается. Не-
              обходимо отметить, что в качестве счетчика могут использоваться пере-
              менные символьного и интервального типа.
                     Пример использования for - цикла для вывода на экран графика
              функции y=sin(x):
              ………………………………………..
              for I:=0 to PaintBox1.Width do
                begin
                    Y:=Round(100*Sin(I/20));
                    PaintBox1.Canvas.Pixels[I,Y]:=clAqua;
                end;
              ………………………………………...

              6) Циклы с предусловием. Здесь набор инструкций повторятся до тех пор,
              пока выполняется некоторое условие. В качестве условия используется ло-
              гическое выражение. Проверка условия происходит перед тем, как выпол-
              няется следующий шаг. Если значение логического выражения равно true
              ("истина"), продолжается выполнение цикла, если – false ("ложь"), цикл
              заканчивается. Общий вид инструкции:

              while логическое выражение do
                 begin
                    Инструкция;
                    ……………………….
                    Инструкция;
                 end;

                    Пример использования цикла с предусловием
              ………………………………………
              with Image1 do
              while ((X>0) and (X0) and (Y