pascal统计大写英文字母的个数

pascal统计大写英文字母的个数
【入门】统计大写英文字母的个数
时间限制：1000MS 内存限制：1000K
705 通过次数：528
【试题描述】
算算以‘.’结束的一串字符中含有多少个大写的英文字母.
【输入描述】
输入一串字符,以.结束
【输出描述】
输出一行,即这串字符中大写字母的个数.
【输入样例】
PRC,PRC,I’m from China.
【输出样例】
8
【解题提示】
请使用while..do语句和repeat..until语句两种方法实现.
【试题来源】
函数还未学