"Теория вероятности Шейтона" и "Кодирование/дикодирование информации" (C++)

#include<iostream.h>
#include<conio.h>
#include<graphics.h>
#include<math.h>
#include<fstream.h>
#include<string.h>
char text;
char alf[26]="abcdefghijklmnopqrstuvwxyz";
int i,j,num[26];
float h;
void main()
{clrscr();
for (i=0;i<26;i++)
num[i]=0;
ifstream file("en.txt");
if (!file)
cout<<"Файл не открыт \n";
while (file>>text)
{for (i=0;i<26;i++)
if (alf[i]==text)
num[i]++; j++;}
for (i=0;i<26; i++)
if (num[i]!=0)
h=h+(float(num[i])/j)*(log(float(j)/num[i])/log(2));
cout<<"Распределение букв: \n";
for(i=0;i<26;i++)
cout<<alf[i]<<": "<<num[i]<<"\t";
cout<<"\n Энтропия: "<<h;
getch();
int dr=DETECT,mod;
initgraph(&dr,&mod,"");
setcolor(2);
line (40,440,550,440);
line (40,440,40,50);
outtextxy(45, 450, "a b c d e f g h i j k l m n o p q r s t u v w x y z");
int l;
for(i=0;i<26;i++)
{setcolor(14);
setfillstyle(SOLID_FILL,14);
l=45+i*16;
if (num[i]!=0)
{bar (l,440,l+7,440-num[i]);
floodfill(l+2,440-num[i]+1,14);}}
getch();
closegraph();}

 #include <iostream.h>
 #include <conio.h>
 #include <string.h>
 #include <fstream.h>
 char pas[100],z,n,c;
 int i;
 void main()
 { clrscr();
 cout<<"\t\t\t\tЗадание 1\n\n";
 char pas[]="LLLLOLOOLOOOOLLOLLOOLLLOLLOOOLOOLOL";
 cout<<"Нужно расшифровать слово: "<<pas<<" используя коды\n букв и условие Фано.";
 cout<<"\n\nПолученное слово: ";
 for (int i=0;i<strlen(pas);i++)
 {switch (pas[i]){case 'O' :{switch (pas[++i])
 {case 'L' : cout << "к"; goto w;
 case 'O' : cout << "о"; goto w;}}
 case 'L' : {switch (pas[++i]) {
 case 'O' : {switch (pas[++i])
 {case 'L' : cout << "д"; goto w;
 case 'O' : cout << "н"; goto w;}}
 case 'L' : {switch (pas[++i])
 {case 'L' :
 {switch (pas[++i])
 {case 'O' : cout << "ы"; goto w;
 case 'L' : cout << "э"; goto w;}}
 case 'O' : {switch (pas[++i])
 {case 'O' : cout << "й"; goto w;
 case 'L' : cout << "м"; goto w;} } } } } } }
 w:}
 getch();
 clrscr();
 
 //2
 cout<<"\t\t\t\tЗадание 2\n\n";
 ifstream file("cshem.dat");
 if (!file) cout<<"Файл не может быть открыт!";
 char k[10],l[10];
 int m=0;
 file>>k;
 while (file>>l)
 {
 m=0;
 for (i=0;i<strlen(k);i++)
 {if (k[i]!=l[i])
 m++;
 }
 cout<<"\nРасстояние Хемминга для слов "<<k<<" и "<<l<<" равно "<<m;
 strcpy(k,l);
 }
 file.close();
 getch();
 clrscr();
 //3
 cout<<"\t\t\t\tЗадание 3\n\n";
 char pr[]="LOOLLOOLLOO";
 char y[100];
 cout<<"Нужно найти производную слова: "<<pr<<"\n\n";
 for (i=0;i<strlen(pr);i++)
 {if (pr[i]==pr[i-1]) y[i]='O';
 else y[i]='L';}
 int n=i;
 cout<<"Производной является:";
 for (i=0;i<n;i++)
 cout<<y[i];
 getch();}