Цикли з лічильником і передумовою.Графічні примітиви.

While <умова> do <оператор>;

For I : = N to K do <оператор>;

Repeat <тіло циклу> until <умова>;

 if <умова> then <оператор>;

цикли з умовою

цикли з передумовою

цикли з лічильником

цикли з післяумовою

1

3

10

0

 слідування в алгоритмі

цикл в алгоритмі

розгалуження в алгоритмі

умова в алгоритмі

1

4

6

9

3

5

8

CheckBox 

ComboBox

RadioButton

BitBtn 

For-to-do

Repeat-until

While-do

 If-Then-else

Canvas.MoveTo(x, y)

Canvas.Rectangle(x1, y1, x2, y2)

Canvas.LineTo(x, y)

 Canvas.Ellipse(x1, y1, x2, y2)

Canvas.Color:=clRed;

Canvas.Brush:=clRed;

Canvas.Pen.Color:=clRed;

  Canvas.Brush.Color:=clRed;

Canvas.Color.Brush:=clRed;

Caption

  Canvas

Name

Width

Canvas.Pie (x1, y1, x2, y2, x3, y3, x4, y4);

 Canvas.LineTo (x, y);

Canvas.Rectangle (x1, y1, x2, y2);

Canvas.MoveTo (x, y);

Canvas.Brush.Style

Canvas.LineTo (x, y);

Canvas.Pen.Style

 Canvas.MoveTo (x, y);