PROGRAM Demo
VAR
  a int16 := 0;
  b int16 := 0;
  i int16 := 0;
END_VAR

WHILE a < 5 DO
    a := a + 1;
END_WHILE;

FOR i := 1 TO 10 DO
    b := b + i;
END_FOR;

END_PROGRAM