Дайте комментарии к коду

@litbit · Регистрация: 14.03.2013

Студворк — интернет-сервис помощи студентам

Здравствуйте.
Кто в теме, дайте комментарии к коду

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
#include <vcl.h>
#include <string.h>
#include <stdio.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
unsigned long Regist = 1;
char *filenameIn; / имя открываемого файла
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if (OpenDialog1->Execute())
        {Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
        Button1->Enabled=true;
        }
else
        {ShowMessage("Ошибка при открытии файла!");
        Button1->Enabled=false;
        }}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
if (SaveDialog1->Execute())
        {Memo2->Text="";
        Button1->Enabled=true;
        }
else
        {ShowMessage("Ошибка при открытии файла!");
        Button1->Enabled=false;
        }}
//---------------------------------------------------------------------------
int RSLOS (TMemo *Memo3)
{
 
int i=0;
unsigned long uL = StrToInt (Memo3->Lines->Strings[i]);
for (int i=0;i<Memo3->Lines->Count-1;i++)
        {uL^=(Regist>>StrToInt(Memo3->Lines->Strings[i]));
        }
uL&=0x00000001;
uL<<=StrToInt(Memo3->Lines->Strings[0]);
uL|=(Regist>>1);
Regist = uL;
return Regist &0x00000001;
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
unsigned char ch;
FILE *INfile, *OUTfile;
filenameIn=OpenDialog1->FileName.c_str();
char *filenameOut=SaveDialog1->FileName.c_str();
        INfile=fopen(filenameIn, "rb");
        OUTfile=fopen(filenameOut, "wb");
Regist=StrToInt(Edit1->Text);
 
unsigned char byte = 0;
while (!feof(INfile))
{
        if (fread(&ch,sizeof(unsigned char),1,INfile))
        {
                for(int i = 0; i < 8; i++)
                {
                        byte |= (unsigned char)RSLOS(Memo3);
                        byte <<= 1;
                }
                byte ^= ch;
                int count=fwrite(&byte,sizeof(unsigned char),1,OUTfile);
                }
}
fclose(INfile);
fclose(OUTfile);}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Memo2->Lines->LoadFromFile(OpenDialog2->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Memo2->Lines->LoadFromFile(OpenDialog2->FileName);}

@SlashX6 · 17.03.2013, 15:23

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
#include <vcl.h>
#include <string.h>
#include <stdio.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
unsigned long Regist = 1;
char *filenameIn; // имя открываемого файла
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if (OpenDialog1->Execute())                                               // Функция запуска открытия 
        {Memo1->Lines->LoadFromFile(OpenDialog1->FileName); // Загружаем из файла
        Button1->Enabled=true;                                            // Включить кнопку
        }
else
        {ShowMessage("Ошибка при открытии файла!"); 
        Button1->Enabled=false;                                          // Выключить кнопку
        }} 
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
if (SaveDialog1->Execute())                         // Функция запуска сохранения 
        {Memo2->Text="";                             // Список Memo очищаем
        Button1->Enabled=true;                      // Показываем кнопку
        }
else
        {ShowMessage("Ошибка при открытии файла!");
        Button1->Enabled=false;                     // Выключить кнопку
        }}
//---------------------------------------------------------------------------
int RSLOS (TMemo *Memo3)
{
 
int i=0;
unsigned long uL = StrToInt (Memo3->Lines->Strings[i]);
for (int i=0;i<Memo3->Lines->Count-1;i++)
        {uL^=(Regist>>StrToInt(Memo3->Lines->Strings[i]));
        }
uL&=0x00000001;
uL<<=StrToInt(Memo3->Lines->Strings[0]);               // Запись в роле Memo
uL|=(Regist>>1);
Regist = uL;
return Regist &0x00000001;                                    // возвращаем Regist &0x00000001
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
unsigned char ch;
FILE *INfile, *OUTfile;                                           // Указатели на файл для записи и чтения 
filenameIn=OpenDialog1->FileName.c_str();               // Файл для записи
char *filenameOut=SaveDialog1->FileName.c_str();    // Файл для чтения
        INfile=fopen(filenameIn, "rb");                         // Открытие файла с названием  "rb" 
        OUTfile=fopen(filenameOut, "wb");                   // Чтение файла с названием  "wb"
Regist=StrToInt(Edit1->Text);                                // Записываем какие-то значения в Edit1
 
unsigned char byte = 0;
while (!feof(INfile))                                              // Если не конец файла
{
        if (fread(&ch,sizeof(unsigned char),1,INfile))    // Если не конец файла
        {
                for(int i = 0; i < 8; i++)                       // Если не конец файла
                {
                        byte |= (unsigned char)RSLOS(Memo3);    
                        byte <<= 1;
                }
                byte ^= ch;
                int count=fwrite(&byte,sizeof(unsigned char),1,OUTfile);   // Запись в файл результатов
                }
}
fclose(INfile);            // Закрытие в файле
fclose(OUTfile);}       // Закрытие вне файла
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Memo2->Lines->LoadFromFile(OpenDialog2->FileName);   // Загрузка из файла
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)       
{
Memo2->Lines->LoadFromFile(OpenDialog2->FileName);}     // Загрузка из файла

Что смог, то и прокоментировал

@kzru_hunter · 17.03.2013, 15:31

Сообщение от SlashX6

FILE *INfile, *OUTfile; // Указатели на файл для записи и чтения
filenameIn=OpenDialog1->FileName.c_str(); // Файл для записи
char *filenameOut=SaveDialog1->FileName.c_str(); // Файл для чтения
INfile=fopen(filenameIn, "rb"); // Открытие файла с названием "rb"
OUTfile=fopen(filenameOut, "wb"); // Чтение файла с названием "wb"
Regist=StrToInt(Edit1->Text); // Записываем какие-то значения в Edit1

неправильно

@litbit · 17.03.2013, 15:41 **[ТС]**

SlashX6, спасибо за помощь.

kzru_hunter, а как будет правильно?

Добавлено через 3 минуты
К сведению. Это программа реализует потоковое шифрование с РСЛОС.
Я в программировании на С++ не силен, в теории полностью разобрался по данному вопросу, но как реализовать на практике не знаю, не знаю правильно работает эта программа или нет.

@litbit · 17.03.2013, 15:45 **[ТС]**

Выше код программы потокового шифрования на основе РСЛОС.
Отводная последовательность РСЛОС задается полиномом x^24*+*x^4*+*x^3*+*x*+*1.
Кто может исправьте работу программы, если алгоритм работает не корректно и напишите комментарии к программе. Очень признателен.
Теорию по данной теме добавляю во вложение

Задание:
Разработать программу – генератор псевдослучайной последовательности бит для шифрования и расшифровывания текста при помощи шифра гаммирования. Программа должны обеспечивать:
задание режима работы (генерация гаммы с записью ее в файл/шифрование), имени входного файла, имени результирующего файла;
ввод параметров генератора с клавиатуры;
генерирование последовательности длиной 20000 бит с записью ее в файл
шифрование информации, находящейся в текстовом файле, с записью результата в другой файл.Зашифровать и расшифровать файл, с использованием разработанной программы. - это для того, чтобы было понятно что программа реализует.

@kzru_hunter · 17.03.2013, 16:03

litbit
Попробуйте тут вопрос с программой решить: https://www.cyberforum.ru/order-program/
Там мало берут.

Добавлено через 6 минут
исправил комментарии:

Сообщение от kzru_hunter

FILE *INfile, *OUTfile; // Указатели на файл чтения и записи соответственно
filenameIn=OpenDialog1->FileName.c_str(); // путь к файлу для чтения
char *filenameOut=SaveDialog1->FileName.c_str(); // путь к файлу для записи
INfile=fopen(filenameIn, "rb"); // открытие файла в режимах "rb" (r - чтение, b - указывает, что файл бинарный)
OUTfile=fopen(filenameOut, "wb"); // открытие файла в режимах "wb" (w - запись, b - указывает, что файл бинарный)
Regist=StrToInt(Edit1->Text); // запись числа из Edit1 в переменную Regist

@litbit · 17.03.2013, 16:31 **[ТС]**

kzru_hunter, в том разделе пишут программы по серьезнее. А эта по лабораторной.
И уже практически готовая. Возможно немного криво работает, но не факт, вроде правильно работает.

Мне хотя бы коменты к коду
а то не во всем могу разобраться в коде

@kzru_hunter · 17.03.2013, 16:53

В этом разделе не разбираются с программами, а только решают вопросы по языку, билдеру, алгоритмам, атомарным или интересным задачам.
Делите вашу программу на неделимые части и задавайте вопросы по каждой такой части, если вдруг не сможете разобраться по ним и найти решение на форуме или в интернете

@litbit · 17.03.2013, 17:12 **[ТС]**

kzru_hunter, из кода я не пойму следующее:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
unsigned long Regist = 1; // что обозначает эта переменная
int RSLOS (TMemo *Memo3) // что обозначает эта переменная, не понятна часть которая в скобках, для чего там указывается мемо.
// не понятен этот блок кода
unsigned long uL = StrToInt (Memo3->Lines->Strings[i]);
for (int i=0;i<Memo3->Lines->Count-1;i++)
        {uL^=(Regist>>StrToInt(Memo3->Lines->Strings[i]));
        }
uL&=0x00000001;
// следующее тоже
uL|=(Regist>>1);
// и не понятно, что происходит в следующем блоке
unsigned char byte = 0;
while (!feof(INfile))                                              
{
        if (fread(&ch,sizeof(unsigned char),1,INfile))    
        {
                for(int i = 0; i < 8; i++)                     
                {
                        byte |= (unsigned char)RSLOS(Memo3);    
                        byte <<= 1;
                }
                byte ^= ch;

Я бы постарался разобраться сам по подробнее, но к сожалению мало времени (((
Если можете прокомментируйте эти части кода. Я постараюсь разобраться правильно ли работает программа, так как в теории полностью понимаю как происходит потоковое шифрование на основе РСЛОС.

@kzru_hunter · 17.03.2013, 17:34

Сообщение от litbit

int RSLOS (TMemo *Memo3) // что обозначает эта переменная, не понятна часть которая в скобках, для чего там указывается мемо

обычно это делается, чтобы функция заносила информацию в Memo

Сообщение от litbit

unsigned long Regist = 1; // что обозначает эта переменная

сам не знаю, запутанный код и без комментариев

По остальным моментам Вам нужно прочитать про "Операторы C++", "Типы C++", "Циклы C++", "Ветвления C++", описание функций StrToInt, feof, fread,

Новые блоги и статьи Все статьи Все блоги /
Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	Программный отбор значений справочника Maks 21.03.2026 Установка программного отбора значений справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .

@litbit 0 / 0 / 1 Регистрация: 14.03.2013 Сообщений: 150
	17.03.2013, 15:41 [ТС]
	SlashX6, спасибо за помощь. kzru_hunter, а как будет правильно? Добавлено через 3 минуты К сведению. Это программа реализует потоковое шифрование с РСЛОС. Я в программировании на С++ не силен, в теории полностью разобрался по данному вопросу, но как реализовать на практике не знаю, не знаю правильно работает эта программа или нет. 0

@litbit 0 / 0 / 1 Регистрация: 14.03.2013 Сообщений: 150
	17.03.2013, 16:31 [ТС]
	kzru_hunter, в том разделе пишут программы по серьезнее. А эта по лабораторной. И уже практически готовая. Возможно немного криво работает, но не факт, вроде правильно работает. Мне хотя бы коменты к коду а то не во всем могу разобраться в коде 0

@kzru_hunter 1124 / 795 / 101 Регистрация: 01.02.2011 Сообщений: 1,887 Записей в блоге: 1
	17.03.2013, 16:53
	В этом разделе не разбираются с программами, а только решают вопросы по языку, билдеру, алгоритмам, атомарным или интересным задачам. Делите вашу программу на неделимые части и задавайте вопросы по каждой такой части, если вдруг не сможете разобраться по ним и найти решение на форуме или в интернете 0