[Start]
print "Ciao! Scrivi la somma di tua spesa?"
input s
      if ( s < 50) then
      s = s-((s/100)*10)
      print " Il prezzo per Lei e " ; s
      x = (s/100)*10
      print  " Lo sconto per Lei e " ; x
      print "Voi calcolare di nuovo? (si or no)"
      input answer$
      if answer$ = "si" then
            goto [Start]
      else
      print "Arrividerci"
            stop
            end if