1에서 100까지 Tcl 애플릿을 추가하는 예제 코드

거의 2년 동안 테스트를 해오면서 평소에는 재미없는 일에 시간을 보내고 있습니다. ㅎㅎ 진정하고 나니 아직 뭔가 배워야 할 것 같은 느낌이 들지만 작업 기계가 좋지 않습니다. 충분한. 저는 일상 업무에서 Tcl 언어를 조금 접했습니다. 회사에 Tcl 언어를 사용하는 훌륭한 사람이 있는데 정말 유용합니다. 그래서 제가 직접 배우기 시작했는데, 아직도 프로그래밍에 조금 관심이 생기네요, 하하.

어떻게 배울 수 있나요? 읽는 것만으로는 부족하고 학습을 촉진하는 연습을 하여 for 루프와 while 루프를 사용하여 1부터 100까지 더하는 작은 프로그램을 작성해 봤습니다. 에너지 부족, 이전의 이해력 부족, 이것이나 저 실수입니다. 천천히 하세요, 하하, 힘내세요!

for {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 ;

새로운 것을 배울 때 처음에는 인내심이 필요하다고 생각합니다. 인내 글쎄요, 하하, 처음에는 불안하기 쉽지만 나중에는 포기하기 쉽거든요. . .

[liweikui 작성, 2009년 5월 6일]

위 내용은 1에서 100까지 Tcl 애플릿을 추가하는 예제 코드의 상세 내용입니다. 자세한 내용은 PHP 중국어 웹사이트의 기타 관련 기사를 참조하세요!