PROGRAM rombusz
  VÁLTOZÓK:
    i, k: EGÉSZ
 
  k := 1
  CIKLUS AMÍG k < 6
    i := 5 - k
    CIKLUS AMÍG i > 0
      KI: "  "
      i := i - 1
    CIKLUS_VÉGE
    CIKLUS AMÍG i < 2 * k - 1
      KI: " *"
      i := i + 1
    CIKLUS_VÉGE
    KI: SV
    k := k + 1
  CIKLUS_VÉGE
  k := 4
  CIKLUS AMÍG k > 0
    i := 5 - k
    CIKLUS AMÍG i > 0
      KI: "  "
      i := i - 1
    CIKLUS_VÉGE
    CIKLUS AMÍG i < 2 * k - 1
      KI: " *"
      i := i + 1
    CIKLUS_VÉGE
    KI: SV
    k := k - 1
  CIKLUS_VÉGE
PROGRAM_VÉGE