Exemple de code pour ajouter une applet Tcl de 1 à 100

Je fais des tests depuis près de deux ans, et mon temps habituel est occupé par un travail qui n'est pas amusant Haha, après m'être calmé, je sens que j'ai encore besoin d'apprendre quelque chose, mais la machine qui fonctionne n'est pas bonne. assez. Je suis un peu exposé au langage Tcl dans mon travail quotidien. Il y a une personne formidable dans l'entreprise qui l'utilise, et c'est vraiment utile. J'ai donc commencé à l'apprendre moi-même. Je suis encore un peu intéressé par la programmation, haha.

Comment apprendre ? La simple lecture ne suffit pas, pratiquons pour favoriser l'apprentissage. J'ai utilisé boucle for et boucle while pour écrire un petit programme qui ajoute de 1 à 100. Même si cela semble simple, cela reste quand même. coûte beaucoup d'argent. Manque d'énergie, incompréhension préalable, telle ou telle erreur. Prends ton temps, haha, remonte le moral !

pour {set i 1;set j 0} {$i<=100} {incr i 1} {
set j [expr ($j+$i)]
} ; return $j ;

set i 1
set j 0
while {$i<=100} {
set j [expr ($ j+$i)]
set i [expr ($i+1)]
} ; return $j ;

Je pense que lorsqu'on apprend quelque chose de nouveau, il faut d'abord de la patience, puis persévérance Eh bien, haha, parce que c'est facile d'être anxieux au début, mais ensuite c'est facile d'abandonner. . .

[créé par liweikui, 6 mai 2009]

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!