Difference between revisions of "To"

From Lazarus wiki
Jump to navigationJump to search
m (Text replace - "delphi>" to "syntaxhighlight>")
m (Fixed syntax highlighting)
 
(5 intermediate revisions by 3 users not shown)
Line 1: Line 1:
 +
{{to}}
 +
 +
 +
Back to [[Reserved words]].
 +
 +
 +
[[Keyword]] used to indicate the final value of the control value in a [[For]] loop, and that the loop is to increment the control variable by 1 on each loop.  The value specified by TO should be greater than the initial value of the for loop.
 +
 
== [[For]] to [[Do|do]] ==
 
== [[For]] to [[Do|do]] ==
<syntaxhighlight>
+
 
var I:integer;
+
<syntaxhighlight lang=pascal>
 +
var i : integer;
 
begin
 
begin
  For I :=1 to 10000 do
+
  for i := 1 to 10000 do
    //...
+
  begin
End.
+
    //...
</Delphi>
+
  end;
 +
end;
 +
</syntaxhighlight>
 +
 
 +
The for to allow to execute code repeatedly for a fixed number of times.
 +
 
 +
=== Basic example ===
 +
 
 +
<syntaxhighlight lang=pascal>
 +
var
 +
  loopValue, startValue, endValue, resultValue: integer;
 +
begin
 +
  startValue := 10;
 +
  endValue := 11;
 +
  resultValue := 0;
 +
  for loopValue := startValue to endValue do
 +
    begin
 +
      resultValue := loopValue + resultValue;
 +
    end;
 +
end;
 +
</syntaxhighlight>
 +
 
 +
The loop execute two times and variable resultValue value is 21.
 +
 
 +
=== Start and end value same ===
 +
 
 +
<syntaxhighlight lang=pascal>
 +
var
 +
  loopValue, startValue, endValue, resultValue: integer;
 +
begin
 +
  startValue := 10;
 +
  endValue := 10;
 +
  resultValue := 0;
 +
  for loopValue := startValue to endValue do
 +
    begin
 +
      resultValue := loopValue + resultValue;
 +
    end;
 +
end;
 +
</syntaxhighlight>
 +
 
 +
The loop execute one time and variable resultValue value is 10.
 +
 
 +
=== Start value bigger than end value ===
 +
 
 +
<syntaxhighlight lang=pascal>
 +
var
 +
  loopValue, startNumber, endNumber, resultValue: integer;
 +
begin
 +
  startValue := 10;
 +
  endValue := 9;
 +
  resultValue := 0;
 +
  for loopValue := startValue to endValue do
 +
    begin
 +
      resultValue := loopValue + resultValue;
 +
    end;
 +
end;
 +
</syntaxhighlight>
 +
 
 +
The loop execute none time and variable resultValue value is 0.
 +
 
 +
== Read more ==
 +
 
 +
* [[Downto]]

Latest revision as of 11:54, 1 March 2020

Deutsch (de) English (en) français (fr) русский (ru)


Back to Reserved words.


Keyword used to indicate the final value of the control value in a For loop, and that the loop is to increment the control variable by 1 on each loop. The value specified by TO should be greater than the initial value of the for loop.

For to do

var i : integer;
begin
 for i := 1 to 10000 do
   begin
     //...
   end;
end;

The for to allow to execute code repeatedly for a fixed number of times.

Basic example

var
  loopValue, startValue, endValue, resultValue: integer;
begin
  startValue := 10;
  endValue := 11;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;
end;

The loop execute two times and variable resultValue value is 21.

Start and end value same

var
  loopValue, startValue, endValue, resultValue: integer;
begin
  startValue := 10;
  endValue := 10;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;
end;

The loop execute one time and variable resultValue value is 10.

Start value bigger than end value

var
  loopValue, startNumber, endNumber, resultValue: integer;
begin
  startValue := 10;
  endValue := 9;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;
end;

The loop execute none time and variable resultValue value is 0.

Read more