输入a1，a2，a3，…，a20；
i=1；a=0；b=0；c=0；
If ai＞0 Then
a=a+1
Do
If ai=0 Then
b=b+1
Else
c=c+1
i=i+1
Loop While i≤20
输出a，b，c.
请改用For循环语句写出．
输入a1，a2，a3，…，a20；
i=1；a=0；b=0；c=0；
If ai＞0 Then
a=a+1
Do
If ai=0 Then
b=b+1
Else
c=c+1
i=i+1
Loop While i≤20
输出a，b，c.
请改用For循环语句写出．
答案：
改写为：输入a1，a2，a3，…，a20；a=0；b=0；c=0；
For i=1 To 20
输出i