C :

int stl(char a[])
{int i=0;
for(i=0;a[i]!='\0';)
i++;
return i;
}
int main(int argc, char* argv[])
{char a[100];
gets(a);
printf("%d\n",stl(a));
	return 0;
}

C++ :

#include <stdio.h>
#include <string.h>
int main() {
	char str[101];
	scanf("%s", str);
	printf("%d\n", strlen(str));
	return 0;
}

Pascal :

var s:string;
begin
  readln(s);
  write(length(s));
end.

Java :

import java.util.*;

public class Main{
	public static void main (String[] args) {
		Scanner in=new Scanner(System.in);
		String s=in.nextLine();
		System.out.println (s.length());
	}
}