Exemple 3
Exemple 3
Exemple 3
Exemple 3
Cet exemple utilise
résultat. La structure
:prog3()
:Prgm
Ê
:Dialog
©
:
Title "Enter an integer"
©
:
Request "Integer",n
Ê
:EndDlog
Ë
:expr(n)!n
:0!temp:0!I
Ì
:Loop
©
:
temp+i!temp
©
:
i+1!I
©
:
If i>n
©
:
Exit
Ì
:EndLoop
Í
:Dialog
©
:
Title "The answer is"
©
:
Text string(temp)
Í
:EndDlog
ê
:EndPrgm
Ê
Définit une boîte de dialogue pour la saisie.
Ë
Convertit la chaîne entrée avec Request en expression.
Ì
Cacul de boucle.
Í
Définit une boîte de dialogue pour le résultat.
Programmation
pour créer des boîtes de dialogue de saisie et de
Dialog...EndDlog
est utilisée pour calculer le résultat.
Loop...EndLoop
730