#include <std.h>

#define LIMIT 25

main()
{
	int c, x, i, size[LIMIT];
	x=0;

	for (i=0;i<LIMIT;++i)
		size[i]=0;
	i=0;
	while ((c = getch()) != EOF) { 
		if (c!='\b' && c!='\t' && c!='\n' && c!=' '  && c!='.' && c!=',')
			++i;
		else if (i!=0 && i<LIMIT) {
			++size[i];
			i=0;
		}
		else if (i>=LIMIT) {
			x++;
			i=0;
		}
	}
	putfmt("Occurrences by size\n");
	for (i=0; i < LIMIT; ++i)
		if (size[i])
			putfmt("size %i, %i\n", i, size[i]);
	if (x)
		putfmt("Over 24 %i\n", x);
}