Не считает произведение разных типов данных

for (i=0;i<N;i++) 
 {
  p[i]=1.0*ws[i]/N;
 }

#include <stdio.h>
#include <string.h>
#include <conio.h>
#include <math.h>
#include <stdlib.h>
 
#define n 69 //Є®«ЁзҐбвў® бЁ¬ў®«®ў ў **Ј«Ё©бЄ®¬ *«д*ўЁвҐ ЎҐ§ гзҐв* ॣЁбва* c 32 Ї® 127 Є®¤ бЁ¬ў®«*  в*Ў«Ёжл ASCII
 
void swap (long *w, char *CHAR, long i, long j) //®Ў¬Ґ* н«Ґ¬Ґ*в®ў ¬*ббЁў*
 {
  long t; char T;
  t=w[i];
  w[i]=w[j];
  w[j]=t;
  T=CHAR[i];
  CHAR[i]=CHAR[j];
  CHAR[j]=T;
 }
 
void shake (long *x, char *CHAR) //¤«п гЇ®а冷зҐ*Ёп ¬*ббЁў* ўҐа®пв*®б⥩ Ї® ў®§а*бв**Ёо ЁбЇ®«м§гҐ¬ 襩ЄҐа*го б®авЁа®ўЄг
  {
   long L,R,N,S,j,i;
   L=0;  //«Ґў*п Ја**Ёж* ¬*ббЁў*
   R=n-1;  //Їа*ў*п Ја**Ёж* ¬*ббЁў*
   N=n-1;    //Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ¬*ббЁў* (*㬥а*жЁп б 0)
   while (L<R)
   {
    for(j=R; j>L; --j)  //Їа®е®¤ бЇа*ў* **«Ґў®
    {
     if (x[j]<x[j-1])
     {
      swap(x,CHAR,j,j-1);
      N=j;
     }
    }
    L=N;
     for (j=L; j<R; ++j)  //Їа®е®¤ б«Ґў* **Їа*ў®
     {
      if (x[j]>x[j+1])
      {
       swap(x,CHAR,j,j+1);
       N=j;
      }
     }
     R=N;
   }
   for (i=0,S=1;i<n-2;++i)
   {
   if (x[i]>x[i+1])
     S++;
   }
  if (S>1)
   {
    printf("\n ЋиЁЎЄ*, ¬*ббЁў *Ґ ®вб®авЁа®ў**, Є®«ЁзҐбвў® бҐаЁ© Ў®«миҐ 1 \n");
    getch();
   }
  }
 
 
 
 
void main()
{
 FILE  *f;
 char  key, ch,
    fname[50], //¬*ббЁў ¤«п еа**Ґ*Ёп Ё¬Ґ*Ё д*©«*
    CHAR[n],  //¬*ббЁў ўбҐе бЁ¬ў®«®ў **Ј«Ё©бЄ®Ј® *«д*ўЁв*
    **C,//¬*ваЁж* ¤«п еа**Ґ*Ёп н«Ґ¬Ґ*в*а*ле Є®¤®ў
    *CHAR_S; //¬*ббЁў ¤«п еа**Ґ*Ёп бЁ¬ў®«®ў ўбваҐз*ойЁебп ў д*©«Ґ
 long  i,j,m,N, //ЇҐаҐ¬Ґ**лҐ бзҐвзЁЄЁ
    w[n], //з*бв®вл Ї®пў«Ґ*Ёп бЁ¬ў®«®ў ў ⥪бвҐ
    *ws,//®вб®авЁа®ў***л© ¬*ббЁў з*бв®в
    *L; //¬*ббЁў ¤«Ё** Є®¤®ўле б«®ў
 double *p,//¬*ббЁў ўҐа®пв*®б⥩ Ї®пў«Ґ*Ёп бЁ¬ў®«* ў ¤***®¬ ⥪бвҐ
    Hmax=0.0, //¬*ЄбЁ¬*«м**п н*ва®ЇЁп ⥪бв*
    H=0.0,//н*ва®ЇЁп ?Ґ**®**
    s;//Є®*ва®«м Їа*ўЁ«м*®бвЁ а*бзҐв* ¬*ббЁў* ўҐа®пв*®б⥩
 memset(CHAR,0 ,sizeof(CHAR));
 for(i=0;i<=32;i++)//§*Ї®«*Ґ*ЁҐ ¬*ббЁў* Є®¤*¬Ё бЁ¬ў®«®ў б®Ј«*б*® в*Ў«ЁжҐ ASCII ЎҐ§ гзҐв* ॣЁбва*
 {
  CHAR[i]=32+i;
 }
 for(i=33;i<n;i++)
 {
  CHAR[i]=58+i;
 }
 
 do
 {
  clrscr();
  m=0;  //§**зҐ*Ёп ®Ў*г«повбп ¤«п ЁбЄ«озҐ*Ёп ®иЁЎ®Є ЇаЁ ®вЄалвЁЁ ¤агЈ®Ј® д*©«*
  N=0; //Є®«ЁзҐбвў® бЁ¬ў®«®ў ў ⥪бвҐ
  memset(w,0.0,sizeof(w));
  memset(fname,0,sizeof(fname));
  printf ("\n ‚ўҐ¤ЁвҐ **Ё¬Ґ*®ў**ЁҐ д*©«* Ё Їгвм Є *Ґ¬г. \n");
  fgets(fname,sizeof(fname),stdin);
  m=strlen(fname);
  fname[m-1]=0;
  f=fopen(fname,"rt") ;
  if (f==NULL)
  {
   printf("\n ЋиЁЎЄ* ®вЄалвЁп д*©«*! \n");
   getch();
   exit(0);
  }
  while(!feof(f))
  {
   ch=getc(f);    //бзЁвлў**ЁҐ бЁ¬ў®«®ў
   if((ch>=65)&&(ch<=90)) //Ґб«Ё §*Ј«*ў**п ЎгЄў* в® ЁЈ*®аЁа㥬 ॣЁбва
    i=ch-26;
   else
   {
    for (j=0;j<n;j++)
     if (ch==CHAR[j])
     {
      i=j;
      break;
     }
   }
   w[i]+=1;
 }
 
 shake(w,CHAR);//б®авЁа®ўЄ* ¬*ббЁў* з*бв®в
 
 for (i=0; i<n; i++)
 {
  if (w[i]!=0)
   N++;
 }
 
 ws=(long *)malloc(N*sizeof(long));
 if (ws==NULL)
 {
  puts("Њ*ббЁў ws *Ґ ᮧ¤**!");
  getch();
  return;
 }
 
 CHAR_S=(char *)malloc(N*sizeof(char));
 if (CHAR_S==NULL)
 {
  puts("Њ*ббЁў CHAR_S *Ґ ᮧ¤**!");
  getch();
  return;
 }
 j=0;
 for (i=n-N; i<n; i++)//Є®ЇЁа®ў**ЁҐ бЁ¬ў®«®ў б з*бв®в®© Ї®п«ўҐ*Ёп >0 ў ¤Ё**¬ЁзҐбЄЁ© ¬*ббЁў
 {
   ws[j]=w[i];
   CHAR_S[j]=CHAR[i];
   j++;
 }
 
 p=(double *)malloc(N*sizeof(double)) ;
 if (p==NULL)
 {
  puts("Њ*ббЁў p *Ґ ᮧ¤**!");
  getch();
  return;
 }
 
 for (i=0;i<N;i++) //а*ббзҐв н*ва®ЇЁЁ д*©«*
 {
  p[i]=1.0*ws[i]/N;//§*Ї®«*Ґ*ЁҐ ¬*ббЁў* ўҐа®пв*®б⥩ Ї®пў«Ґ*Ёп бЁ¬ў®«®ў/
 }
 
 //®бў®Ў®¦¤Ґ*ЁҐ Ї*¬пвЁ ®в ᮧ¤***ле ¤Ё**¬ЁзҐбЄЁе ¬*ббЁў®ў
 for (i=0;i<N;i++)
 
 free(p);
 free(ws);
 
 getch();
 fclose(f);
 puts ("\n ЋвЄалвм ¤агЈ®© д*©«? (ЌҐв=Esc)");
 key=getch();
 }
 while (key!=27);//ESC
}