Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
0 / 0 / 2
Регистрация: 14.06.2015
Сообщений: 60
1

Шифр хилла - закомпилировать как?

22.11.2016, 16:16. Показов 1894. Ответов 5
Метки нет (Все метки)

Windows forms С++
помогите закомпилировать
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
Следуя описанному выше алгоритму представлен код программы:
//----------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//----------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//----------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//----------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Memo2->Clear();
//------формирование_алфавита-------------------------------------------
char A[55]; int i,j,x,y,z,q=0,n=0,c=0,l=0;
A[0]='а';A[1]='б';A[2]='в';A[3]='г';A[4]='д';A[5]='е';
A[6]='ё';A[7]='ж';A[8]='з';A[9]='и';A[10]='й';A[11]='к';
A[12]='л';A[13]='м';A[14]='н';A[15]='о';A[16]='п';
A[17]='р';A[18]='с';A[19]='т';A[20]='у';A[21]='ф';
A[22]='х';A[23]='ц';A[24]='ч';A[25]='ш';A[26]='щ';
A[27]='ъ';A[28]='ы';A[29]='э';A[30]='ю';A[31]='я';
A[32]='ь';A[33]='_';A[34]='.';A[35]=',';A[36]='-';
A[37]=' ';A[38]='"';A[39]='(';A[40]=')';A[41]=';';
A[42]=':';A[43]='?';A[44]='!';A[45]='1';A[46]='2';
A[47]='3';A[48]='4';A[49]='5';A[50]='6';A[51]='7';
A[52]='8';A[53]='9';A[54]='0';
char B[55];
B[0]='А'; B[1]='Б'; B[2]='В';B[3]='Г';B[4]='Д';B[5]='Е';
B[6]='Ё';B[7]='Ж';B[8]='З';B[9]='И';B[10]='Й';B[11]='К';
B[12]='Л';B[13]='М';B[14]='Н';B[15]='О';B[16]='П';B[17]='Р';
B[18]='С';B[19]='Т';B[20]='У';B[21]='Ф';B[22]='Х';B[23]='Ц';
B[24]='Ч';B[25]='Ш';B[26]='Щ';B[27]='Ъ';B[28]='Ы';B[29]='Э';
B[30]='Ю';B[31]='Я';B[32]='Ь';B[33]='_';B[34]='.';B[35]=',';
B[36]='-';B[37]=' ';B[38]='"';B[39]='(';B[40]=')';B[41]=';';
B[42]=':';B[43]='?';B[44]='!';B[45]='1';B[46]='2';B[47]='3';
B[48]='4';B[49]='5';B[50]='6';B[51]='7';B[52]='8';B[53]='9';
B[54]='0';
for(int i=0;i<StringGrid1->ColCount;i++)
StringGrid1->Cells[i][0]=A[i];
for(int i=0;i<StringGrid1->ColCount;i++)
StringGrid1->Cells[i][1]=B[i];
for(int i=0;i<StringGrid1->ColCount;i++)
StringGrid1->Cells[i][2]=i;
x=Memo1->Lines->Text.Length();
y=Edit2->Text.Length();
//------заполнение_StringGrid3_номерами_символов_ключа----------------
AnsiString S=Edit2->Text;
char *K;
K=new char[y];
for (i=0;i<y;i++)
K[i]=S[i+1];
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
for(int k=0;k<55;k++)
if(K[j+i*3]==*StringGrid1->Cells[k][0].c_str())
StringGrid3->Cells[j][i]=k;
//------заполнение_StringGrid2_номерами_символов_текста-----------------
AnsiString R=Memo1->Text;
char *T;
T=new char[x];
for (i=0;i<x;i++)
T[i]=R[i+1];
c=x%3;
n=(x-x%3)/3;
if(c>=1)
z=n+1;
else z=n;
c=(z*3)-x;
StringGrid2->RowCount=z;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
for(int k=0;k<55;k++)
if((i+1)==z)
{
if((c==1 && c>=j) || c==0 || (c==2 && c>=j+2))
{
if(T[j+i*3]==*StringGrid1->Cells[k][0].c_str() || T[j+i*3]==*StringGrid1->Cells[k][1].c_str())
{
StringGrid2->Cells[j][i]=k;
}
}
else
{
StringGrid2->Cells[j][i]=37;
}
}
else
if(T[j+i*3]==*StringGrid1->Cells[k][0].c_str() || T[j+i*3]==*StringGrid1->Cells[k][1].c_str())
{
StringGrid2->Cells[j][i]=k;
}
//------перемножение_StringGrid2_и_StringGrid3--------------------------
l=3*z;
int *P;
P=new int[l];
for(int i=0;i<l;i++)
P[i]=0;
q=0;
for(int i=0;i<z;i++)
for(int k=0;k<3;k++)
{
for(int j=0;j<3;j++)
P[q]=P[q]+StrToInt(StringGrid2->Cells[j][i])*StrToInt(StringGrid3->Cells[k][j]);
q++;
}
//------вывод_результатов_в_StringGrid4---------------------------------
q=0;
StringGrid4->RowCount=z;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
{
StringGrid4->Cells[j][i]=P[q];
q++;
}
//------заполнение_StringGrid5_значениями_StringGrid4_по_модулю-----
q=0;
StringGrid5->RowCount=z;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
{
StringGrid5->Cells[j][i]=P[q]%55;
q++;
}
//---вывод_текста_в_соответствии_номерам_символов_из_StringGrid5--
char *O;
O=new char[l];
q=0;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
for(int k=0;k<55;k++)
if(StrToInt(StringGrid5->Cells[j][i])==StrToInt(StringGrid1->Cells[k][2]))
{
O[q]=*StringGrid1->Cells[k][0].c_str();
q++;
}
for(i=0;i<l;i++)
Memo2->Lines->Text=Memo2->Lines->Text+O[i];
delete(P);
delete(T);
delete(K);
delete(O);
}
//----------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
Close();
}
//----------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
//----Нахождение_детерминанта_от_блоков_открытого_текста-----------
int Det=0,q=0,i,j;
Det=StringGrid2->Cells[0][0]*(StringGrid2->Cells[1][1]*StringGrid2->Cells[2][2]-StringGrid2->Cells[2][1]*StringGrid2->Cells[1][2])-
StringGrid2->Cells[1][0]*(StringGrid2->Cells[0][1]*StringGrid2->Cells[2][2]-StringGrid2->Cells[2][1]*StringGrid2->Cells[0][2])+
StringGrid2->Cells[2][0]*(StringGrid2->Cells[0][1]*StringGrid2->Cells[1][2]-StringGrid2->Cells[1][1]*StringGrid2->Cells[0][2]);
int I[9];
I[0]=StringGrid2->Cells[1][1]*StringGrid2->Cells[2][2]-StringGrid2->Cells[2][1]*StringGrid2->Cells[1][2];
I[1]=-(StringGrid2->Cells[1][0]*StringGrid2->Cells[2][2]-StringGrid2->Cells[2][0]*StringGrid2->Cells[1][2]);
I[2]=StringGrid2->Cells[1][0]*StringGrid2->Cells[2][1]-StringGrid2->Cells[2][0]*StringGrid2->Cells[1][1];
I[3]=-(StringGrid2->Cells[0][1]*StringGrid2->Cells[2][2]-StringGrid2->Cells[0][2]*StringGrid2->Cells[2][1]);
I[4]=StringGrid2->Cells[0][0]*StringGrid2->Cells[2][2]-StringGrid2->Cells[0][2]*StringGrid2->Cells[2][0];
I[5]=-(StringGrid2->Cells[0][0]*StringGrid2->Cells[2][1]-StringGrid2->Cells[2][0]*StringGrid2->Cells[0][1]);
I[6]=StringGrid2->Cells[0][1]*StringGrid2->Cells[1][2]-StringGrid2->Cells[0][2]*StringGrid2->Cells[1][1];
I[7]=-(StringGrid2->Cells[0][0]*StringGrid2->Cells[1][2]-StringGrid2->Cells[0][2]*StringGrid2->Cells[1][0]);
I[8]=StringGrid2->Cells[0][0]*StringGrid2->Cells[1][1]-StringGrid2->Cells[0][1]*StringGrid2->Cells[1][0];
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
{
StringGrid6->Cells[j][i]=I[q];
q++;
}
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
StringGrid7->Cells[j][i]=StringGrid4->Cells[j][i];
Label8->Caption=Det;
//------перемножение_StringGrid6_и_StringGrid7--------------------------
int E[9];
for(int i=0;i<9;i++)
E[i]=0;
q=0;
for(int i=0;i<3;i++)
for(int k=0;k<3;k++)
{
for(int j=0;j<3;j++)
E[q]=E[q]+StrToInt(StringGrid6->Cells[j][i])*StrToInt(StringGrid7->Cells[k][j]);
q++;
}
//------вывод_результатов_в_StringGrid8---------------------------------
q=0;
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
{
StringGrid8->Cells[j][i]=E[q]/Det;
q++;
}
//---вывод_текста_в_соответствии_номерам_символов_из_StringGrid8--
char O[9];
q=0;
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
for(int k=0;k<55;k++)
if(StrToInt(StringGrid8->Cells[j][i])==StrToInt(StringGrid1->Cells[k][2]))
{
O[q]=*StringGrid1->Cells[k][0].c_str();
q++;
}
Panel1->Caption="";
for(int i=0;i<9;i++)
Panel1->Caption=Panel1->Caption+O[i];
}
//----------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Memo3->Clear();
int q=0,l=0,z,Det=0;
//------Заполнение_StringGrid9_шифротекстом-----------------------------
z=StringGrid4->RowCount;
StringGrid9->RowCount=z;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
StringGrid9->Cells[j][i]=StringGrid4->Cells[j][i];
//------Нахождение_детерминанта_ключа-----------------------------------
Det=StringGrid8->Cells[0][0]*(StringGrid8->Cells[1][1]*StringGrid8->Cells[2][2]-StringGrid8->Cells[2][1]*StringGrid8->Cells[1][2])-
StringGrid8->Cells[1][0]*(StringGrid8->Cells[0][1]*StringGrid8->Cells[2][2]-StringGrid8->Cells[2][1]*StringGrid8->Cells[0][2])+
StringGrid8->Cells[2][0]*(StringGrid8->Cells[0][1]*StringGrid8->Cells[1][2]-StringGrid8->Cells[1][1]*StringGrid8->Cells[0][2]);
int I[9];
I[0]=StringGrid8->Cells[1][1]*StringGrid8->Cells[2][2]-StringGrid8->Cells[2][1]*StringGrid8->Cells[1][2];
I[1]=-(StringGrid8->Cells[1][0]*StringGrid8->Cells[2][2]-StringGrid8->Cells[2][0]*StringGrid8->Cells[1][2]);
I[2]=StringGrid8->Cells[1][0]*StringGrid8->Cells[2][1]-StringGrid8->Cells[2][0]*StringGrid8->Cells[1][1];
I[3]=-(StringGrid8->Cells[0][1]*StringGrid8->Cells[2][2]-StringGrid8->Cells[0][2]*StringGrid8->Cells[2][1]);
I[4]=StringGrid8->Cells[0][0]*StringGrid8->Cells[2][2]-StringGrid8->Cells[0][2]*StringGrid8->Cells[2][0];
I[5]=-(StringGrid8->Cells[0][0]*StringGrid8->Cells[2][1]-StringGrid8->Cells[2][0]*StringGrid8->Cells[0][1]);
I[6]=StringGrid8->Cells[0][1]*StringGrid8->Cells[1][2]-StringGrid8->Cells[0][2]*StringGrid8->Cells[1][1];
I[7]=-(StringGrid8->Cells[0][0]*StringGrid8->Cells[1][2]-StringGrid8->Cells[0][2]*StringGrid8->Cells[1][0]);
I[8]=StringGrid8->Cells[0][0]*StringGrid8->Cells[1][1]-StringGrid8->Cells[0][1]*StringGrid8->Cells[1][0];
for(int i=0;i<3;i++)
for(int j=0;j<3;j++)
{
StringGrid10->Cells[j][i]=I[q];
q++;
}
Label14->Caption=Det;
//------перемножение_StringGrid9_и_StringGrid10-------------------------
l=z*3;
int *E;
E=new int[l];
for(int i=0;i<l;i++)
E[i]=0;
q=0;
for(int i=0;i<z;i++)
for(int k=0;k<3;k++)
{
for(int j=0;j<3;j++)
E[q]=E[q]+StrToInt(StringGrid9->Cells[j][i])*StrToInt(StringGrid10->Cells[k][j]);
q++;
}
//------вывод_результатов_в_StringGrid11--------------------------------
StringGrid11->RowCount=z;
q=0;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
{
StringGrid11->Cells[j][i]=E[q]/Det;
q++;
}
//---вывод_текста_в_соответствии_номерам_символов_из_StringGrid11-
char *O;
O=new char[l];
q=0;
for(int i=0;i<z;i++)
for(int j=0;j<3;j++)
for(int k=0;k<55;k++)
if(StrToInt(StringGrid11->Cells[j][i])==StrToInt(StringGrid1->Cells[k][2]))
{
O[q]=*StringGrid1->Cells[k][0].c_str();
q++;
}
for(int i=0;i<l;i++)
Memo3->Lines->Text=Memo3->Lines->Text+O[i];
delete(O);
}
//----------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
Memo1->Clear();
OpenDialog1->Execute();
if (Form1->OpenDialog1->FileName!="")
Memo1->Lines->LoadFromFile(Form1->OpenDialog1->FileName);
}
//----------------------------------------------------------------------
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.11.2016, 16:16
Ответы с готовыми решениями:

Шифр Хилла
Господа, пишу курсовую, тема шифр Хилла. Все компилируется, запускается, но при выводе...

Шифр Хилла
Доброго времени суток, помогите, пожалуйста 1. Найти матрицу K, такую, чтобы у нее была...

Шифр Хилла
Для тех кто не знает, его суть - есть слово и ключ из букв, допустим слово &quot;студент&quot; а ключ...

Шифр Хилла, дешифрование
Помогите пожалуйста с шифром Хилла. Использую алфавит из 29 символов. Шифрует верно, я проверяла, а...

5
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
31464 / 20511 / 7988
Регистрация: 22.10.2011
Сообщений: 35,624
Записей в блоге: 7
22.11.2016, 16:27 2
Это код для C++ Builder, а не для C++/CLI WinForms. То есть, откомпилировать его под WinForms без переделки не удастся.
1
0 / 0 / 2
Регистрация: 14.06.2015
Сообщений: 60
22.11.2016, 16:29  [ТС] 3
Цитата Сообщение от volvo Посмотреть сообщение
Это код для C++ Builder, а не для C++/CLI WinForms. То есть, откомпилировать его под WinForms без переделки не удастся.
Можете закомпилить ?
Embarcadero RAD Studio 10.1 Berlin Update 1 Architect 24.0.24468.8770 подойдёт мне для этих целей ?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
31464 / 20511 / 7988
Регистрация: 22.10.2011
Сообщений: 35,624
Записей в блоге: 7
22.11.2016, 16:33 4

Не по теме:

Перенесено в раздел по Билдеру



Нет, у меня нет в наличии XE10, да и придумывать, как располагаются компоненты на форме, мне неинтересно. Может, кто-то другой...
0
0 / 0 / 2
Регистрация: 14.06.2015
Сообщений: 60
22.11.2016, 16:37  [ТС] 5
вот все исходники и даже EXE есть, только ей не хватает библиотек, библиотеки докачав, пишет что то насчёт точки входа. (скрин)
Миниатюры
Шифр хилла - закомпилировать как?  
Вложения
Тип файла: zip Лаба 1 - вар 8 -Хилла.zip (1.52 Мб, 36 просмотров)
0
0 / 0 / 2
Регистрация: 14.06.2015
Сообщений: 60
23.11.2016, 02:47  [ТС] 6
решил отключением в настройках проекта: Project->Options->Linker->Use dynamic RTL Project->Options->Packages->Build with runtime packages и собрать проект заново.

кнопка дешифратор не пашет, есть идеи ?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.11.2016, 02:47

Шифр Хилла в делфи
Есть уже написанная программа &quot; Шифратор&quot; реализующая симметричный блочный алгоритм шифрования...

Лабораторная работа: Шифр Хилла
Составить программу с графическим интерфейсом, которая реализует Шифр Хилла

Аффинное матричное преобразование (Шифр Хилла),
Здравствуйте, господа форумчане! Столкнулся с такой задачи и прошу помощи. Если у кого есть...

Закомпилировать прогу
Добрый день, в общем у меня проблема с установкой Visual C++ 6.0, на решение проблемы нету времени....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru