Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 1
Регистрация: 26.10.2015
Сообщений: 11
1

Дешифрование зашифрованного текста

24.04.2016, 12:31. Просмотров 306. Ответов 0
Метки нет (Все метки)

Помогите пожалуйста. Дело в том, что я зашифровал в виде Ascii, а как обратно вывести слово в нормальный (изначальный) вид??

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
program qwerty;
var z,k,i,j,p: integer;
    a,b: string;
    s:array [1..100] of char;
    s1:array [1..100] of string;
begin
  writeln('Введите слово');
  readln(a);
  j:=0;
  writeln('Введите ключ');
  readln(b);
  k:=length(a);
  z:=length(b);
    for i:=1 to k do
      begin
        if j<z then j:=j+1
        else j:=1;
        s[i]:=chr(ord(a[i])+ord(b[j]));
      end;
        for p:=1 to k do
          begin 
            if j<z then j:=j+1
            else j:=1;
            s1[i]:=chr(ord(a[i])-ord(b[j]));
          end;
            for i:=1 to k do
              begin 
                write (s[i]);
                write (s1[i]);
              end;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.04.2016, 12:31
Ответы с готовыми решениями:

Как сделать вывод зашифрованного текста в один файл и расшифрованного текста в другой файл?
Нужно вывести текст зашифрованного сообщения в один файл и расшифрованное сообщение во второй файл...

Шифрование и дешифрование текста
Для английского и русского алфавита. На вход поступает текст, его следует зашифровать. Каждой букве...

Узнать длину ключа зашифрованного текста (Перевод кода из C в Паскаль)
Собственно с Паскалем плохо дружу, а программу нужно реализовать именно в паскале. Всем, кто...

Дешифрование текста
Помогите пожалуйста! Текст шифруется следующим способом: каждое предложение разбивается на группы...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.04.2016, 12:31

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Шифрование и дешифрование текста
Здравствуйте , помогите пожалуйста в следующем вопросе: — составление и испытание программы...

Шифрование и дешифрование текста (шифр Цезаря)
Напишите программу для шифрования и дешифрования текста, используя шифр Цезаря, который является...

Шифрование/дешифрование текста методом перестановки
Помогите переделать шифрование и дешифрование в отдельные процедуры, чтобы можно было сделать меню...

Шифрование/дешифрование текста циклическим шифром со сдвигом на 5 позиций
Доброго времени суток! Обращаюсь к вам с такой вот задачей,надеюсь на вашу помощь.Заранее Спасибо!...

Шифрование/дешифрование текста циклическим шифром со сдвигом на 10 позиций
Напишите программы шифрования и дешифрования текста циклическим шифром со сдвигом на 10 позиций....

Дешифрование зашифрованного текста
Задача:Как сделать чтобы зашифрованный текст снова стал нормальным текстом??Нужно применить...


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

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

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