CJK　C

整数　整；
整数　文字；

回数（　整　＝　零；　整　＜　壱万；　整＋＋　）｛
　　問（（　文字　＝　処理壱（））　＝＝　負壱）割回数；//if
　　処理弐（文字）；
｝