C :

#include<stdio.h>
#include<string.h>
int main(){		
	char s[1000];
	gets(s);
	int len=strlen(s),i,n=0;
	for(i=0;i<len;i++){
		if(s[i]>='A'&&s[i]<='Z'){
			n++;
		}
		
	}
	printf("%d",n);
	return 0; 
	}

C++ :

#include <iostream>
using namespace std;
 
int getNum(char *s){
    int c = 0;
    while(*s != '\0'){
        if(*s >= 'A' && *s <= 'Z'){
            c++;
        }
        s++;
    }
    return c;
}
 
int main(){
    char s[100];
    gets(s);
    int c = getNum(s);
    cout<<c<<endl;
} 

Pascal :

var ch:char;s,j,i:integer;
begin
read(ch);
repeat
if(ch>='A')and(ch<='Z')then s:=s+1;
read(ch);
until ch='.';
readln;
writeln(s);
end. 

Java :

import java.util.Scanner;
public class Main{
	public static void main(String[] args) {
		String str=new Scanner(System.in).nextLine();
		String[] strArray=str.split("\\.");
		String s=strArray[0];
		char[] charArray=s.toCharArray();
		int count=0;
		for(int i=0;i<charArray.length;i++){
			if((int)(charArray[i])>=65&&(int)(charArray[i])<=90){
				count++;
			}
		}
		System.out.println(count);
	}
}

Python :

import string
word = "PRC,PRC,I'm from China"
s = 0
for i in word:
    if  i>='A' and i<='Z':
        s += 1
print(s)