Annotated examples

Variable t : Entier[10] ; i, n : Entier ; maxv, minv : Entier
Debut
  Ecrire "Number of values (max 10):"
  Lire(n)
  Si n > 10 Alors n <- 10 FinSi
  Pour i De 1 A n Pas 1 Faire
    Lire(t[i])
  FinPour
  maxv <- t[1]
  minv <- t[1]
  Pour i De 2 A n Pas 1 Faire
    Si t[i] > maxv Alors maxv <- t[i] FinSi
    Si t[i] < minv Alors minv <- t[i] FinSi
  FinPour
  Ecrire "Max =", maxv
  Ecrire "Min =", minv
Fin

Variable prix : Reel[5] ; qte : Entier[5] ; i : Entier ; total : Reel
Debut
  prix[1] <- 12.5
  prix[2] <- 9.9
  prix[3] <- 5.0
  Pour i De 1 A 3 Pas 1 Faire
    Ecrire "Quantity", i, ":"
    Lire(qte[i])
  FinPour
  total <- 0.0
  Pour i De 1 A 3 Pas 1 Faire
    total <- total + (prix[i] * qte[i])
  FinPour
  Ecrire "Total =", total
Fin

Variable choix, a, b : Entier
Debut
  choix <- 1
  TantQue choix != 0 Faire
    Ecrire "1) Add  2) Multiply  0) Quit"
    Lire(choix)
    Si choix == 1 Alors
      Lire(a) Lire(b)
      Ecrire "Result =", (a + b)
    FinSi
    Si choix == 2 Alors
      Lire(a) Lire(b)
      Ecrire "Result =", (a * b)
    FinSi
  FinTantQue
Fin