Форум программистов, компьютерный форум CyberForum.ru

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
vveronikka
0 / 0 / 0
Регистрация: 27.04.2014
Сообщений: 65
#1

Шифрование заменой части символов (Pascal->C++) - C++

23.05.2014, 07:18. Просмотров 200. Ответов 0
Метки нет (Все метки)

Здравствуйте! Помогите пожалуйста! Нужно провести шифрование текстовой информации заменой части символов. Есть код Паскаль. Надо в С++.
Pascal
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
Program Cipher5;
const
txt1='Privet Privet'#2;
txt2='Shifrovanie textovoy informacii zamenoy chasti simvolov';
var
I:byte;
C:char;
Line:string[$FF];
ShiftTab:array[1..255] of byte;
procedure ChangeCharNum (var C:char);
begin
case C of
#007..#010:    C:=Chr(Ord(C)+243);
#013:          C:=#254;
#026:          C:=#255;
#250..#253:    C:=Chr(Ord(C)-243);
#254:          C:=#013;
#255:          C:=#026;
end;
Exit;
end;
begin
Line:=txt1+txt2;
writeln(line);
randomize;
for I:=1 to Length(line) do
ShiftTab[I]:= Random (250);
ChangeCharNum (Line[I]);
for I:=1 to Length(line) do begin
ChangeCharNum (Line[I]);
if Line[I]<=#250 then
Line[I]:=Chr((Ord(Line[I])+250-ShiftTab[I]) mod 250);
ChangeCharNum (Line[I]);
end;
writeln(Line);
for I:=1 to Length(line) do begin
ChangeCharNum (Line[I]);
if Line[I]<=#250 then
Line[I]:=Chr((Ord(Line[I])+ShiftTab[I]) mod 250);
ChangeCharNum (Line[I]);
end;
Write(line);
writeln;
writeln;
writeln;
Halt;
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.05.2014, 07:18     Шифрование заменой части символов (Pascal->C++)
Посмотрите здесь:

Шифрование заменой - C++
Нужно провести шифрование текстовой информации заменой части символов. Есть код Паскаль. Помогите, пожалуйста const txt1='Privet...

Шифрование символов в файле - C++
День добрый! Проблема такова: Есть файл содержащий исходный набор символов(текст, строки и т.д.). нужно составить программу для...

Шифрование / дешифрование (метод перестановки символов) - C++
Здравствуйте.проблема такая:по варианту дали ключ и метод шифрования.похожие темы нашел но не то(( вернее начало нашел тут...

Шифрование текста путем замены символов - C++
Здравствуйте! Нужна Ваша помощь. Нужно провести шифрование предложения заменой символов в си++. Есть работа в Паскале, а как в си++сделать...

Шифрование методом перестановки символов в заданном порядке - C++
Здравствуйте уважаемые знатоки. Помогите пожалуйста. Мне нужен код(разобраться не могу)%-) шифрования.Пример: 1.вводим: привет 2.задаём...

Вывести части строки до определенных символов - C++
Помогите мне с задачкой. Дана строка, нужно разделить ее на несколько частей до определенных символов (или не обязательно именно так). Вот...

Организовать обработку каждого элемента: печать строк из информационной части и их первых символов - C++
Организовать обработку каждого элемента: печать строк из информационной части и их первых символов. Не понимаю как сделать, помогите. ...

Очередь. Организуйте обработку каждого элемента: печать строк из информационной части и их первых символов - C++
Составьте программу, которая создает очередь из произвольного количества элементов. Информационная часть динамического элемента должна...

Дана строка. Определить, сколько в ней символов *, ;, : [Есть код на Pascal] - C++
Нужно перевести этот код на С++ Uses crt; Var s: String; i,k1,k2,k3: Integer; BEGIN Clrscr; Writeln('Введите строку: ');...

Как поделить консоль на 2 части: в верхней части вывод, в нижней - замена - C++
Ребята, есть 2 функции, одна выводит, вторая меняет, нужно поделить консоль параллельно. В верхней части вывод, в нижней замена. Как это...

Матрица делится на две части главной диагональю. Найти суммы элементов каждой части - C++
Всем здрасьте. В общем смог найти сумму выше главной диагонали, а вот с суммой ниже главной диагонали не получается. Помогите пожалуйста,...

Помощь в задаче с заменой - C++
#include &lt;iostream.h&gt; #include &lt;string.h&gt; #include &lt;conio.h&gt; int main() { char stroka; int len; cin&gt;&gt;stroka; ...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru