#include <stdio.h>
#include <string.h>
#include <math.h>

double get_count (char x[], char c){
	int i; 
	double res=0;
	for (i=0; i<=strlen(x); i++) if (x[i]==c) res+=1;
	return res;
}

double prob (char x[], char c){
	return get_count(x,c) / strlen(x);
}


double coeff_entropy (char x[]) {
	int i;
	double res=0;
	for (i=0; i<=strlen(x); i++) {
		res+= prob(x,x[i]) * log2(prob(x,x[i]));
	}
	res=res*(-1);
	return res;
}

int main () {
	char s[80];
	printf("Entropy\n Enter text...\n");
	scanf("%s",&s);
	printf("Entropy [s] = %f", coeff_entropy(s));
	return 0;
}

#include <stdio.h>
#include <string.h>
#include <math.h>

#define LOG2TO10 0.30102999566398119521373889472449
// Ну нету у меня в Turbo C этой функции, а MinGW в лом запускать : )
double log2(double x)
{
  return log(x) / LOG2TO10;
}

int p_count[256];

void set_p(char *s) {

  for(int i = 0; i < 256; ++i) p_count[i] = 0;

  for(char *p = s; *p; p++)
	p_count[*p] += 1;
}

double coeff_entropy (char *s) {

  double res = 0.0;
  for(int i = 0; i < 256; ++i)
	if(p_count[i]) {
	  double T = ((double)p_count[i] / strlen(s));
	  res += (T * log2(T));
	}
  return (- res);
}

int main () {
  char s[80];
  printf("Entropy\n Enter text...\n");
  scanf("%s",&s);

  set_p(s);
  printf("Entropy [s] = %f", coeff_entropy(s));
  return 0;
}

#define LOG2TO10 0.30102999566398119521373889472449
// Ну нету у меня в Turbo C этой функции, а MinGW в лом запускать 
double log2(double x)
{
  return log(x) / LOG2TO10;
}

#include <stdio.h>
#include <string.h>
#include <math.h>
#define LOG2TO10 0.30102999566398119521373889472449
double _log2(double x)
{
  return log(x) / LOG2TO10;
}
double get_count (char x[], char c){
	int i;
	double res=0;
	for (i=0; i<=strlen(x); i++) if (x[i]==c) res+=1;
	return res;
}

double prob (char x[], char c){
	return get_count(x,c) / strlen(x);
}


double coeff_entropy (char x[]) {
	int i,len=strlen(x);
	double res=0.0;
	for (i=0; i<=len; i++) {
		res+= prob(x,x[i]) * _log2(prob(x,x[i]));
	}
	res=res*(1);
	return res;
}

int main () {
	char s[80];
	printf("Entropy\n Enter text...\n");
	scanf("%s",&s);
	printf("Entropy [s] = %f", coeff_entropy(s));
	//printf("Entropy [s] = %f", prob(s,'1'));
	return 0;
}

for (i=0; i<=strlen(x); i++) if (x[i]==c) res+=1;

#include <stdio.h>
#include <string.h>
#include <math.h>

int alf [256];

void init (){
	for (int i=0; i<=255; i++) alf[i]=0;
}

double entropy (char *p) {
	for (char *c=p, init(); *c!=0; c++) alf[*c] +=1;
	double res=0, len=strlen(p);
	for (int i=0; i<=255; i++) if (alf[i]!=0) res += ((double)alf[i] / len ) * log2((double)alf[i]/len);
	return (-res);
}

int main () {
	char s[80];
	printf(" Enter message...\n");
	scanf("%s",&s);
	printf("Entropy H(x) = %f bit/symbol\nInfo I=n*H(x) = %d",entropy(s),(int)entropy(s)*strlen(s));
	return 0;
}

#define LOG2TO10 0.30102999566398119521373889472449
// Ну нету у меня в Turbo C этой функции, а MinGW в лом запускать smile.gif
double log2(double x)
{
return log(x) / LOG2TO10;
}