编写程序实现将输出入的字符串所有字母转换为大写（若不是字母，则不转换）并输出转换后的字符串?

cls
input a$
dim v$(len(a$))
for i=1 to len(a$)
v$(i)=mid$(a$,i,1)
if v$(i)<>ucase$(v$(i)) then
v$(i)=ucase$(v$(i))
end if
next i
for i=1 to len(a$)
print v$(I);
next i

/*
分为两步：
1.判断某字符是否为字母
2.若字母为小写字符则转换为大写字母

原理：在ASC标准里，‘a’-'z', 'A'-'Z' 对应连续的整数值
所以可以利用大小范围确定是否为字母；
而小写字母减去32，得到的恰是对应的大写字母
*/
#include<stdio.h>
#include<iostream>
using namespace std;
int main()
{
char str[100];
gets(str);
for(int i=0;str[i]!='\0';i++)
{
if(str[i]<='z'&&str[i]>='a')
str[i]-=32;
}
cout<<str<<endl;
return 0;
}