Сети ЭВМ и средства коммуникаций. Балабанов П.В. - 36 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

36
while ~(feof(fid)) % пока не конец файла
string=fgetl(fid); % запись строки из файла в переменную
string
char_tek=size(string,2); % запись длины строки string
end
После того, как длина слова определена, пользователя программы
можно попросить ввести с клавиатуры ключ шифрования и сохранить
его в массив kl так, как показано в примере:
for i=1:char_tek
kl(i)=input('Введите число');
end
Теперь можно зашифровать слово методом перестановки. Это
осуществляется в следующем коде программы:
for i=1:char_tek
shifr(i)=string(kl(i));
end
Шифр помещается в строку shifr, которую можно вывести на эк-
ран с помощью оператора disp(shifr). После этого открытый ранее
файл можно закрыть, применив оператор fclose(fid).
Ниже приведён полный текст программы шифрования слова:
fid=fopen('nietzsche.txt','r');
if(fid==-1)
disp('ошибка открытия файла')
error(mes)
else
while ~(feof(fid))
string=fgetl(fid);
char_tek=size(string,2);
end
clc
disp('Шифруемое слово:')
disp(string)
disp('Длина ключа')
disp(char_tek)
for i=1:char_tek
kl(i)=input('Введите число');
end
for i=1:char_tek
shifr(i)=string(kl(i));
end
disp('Шифрованное слово')
disp(shifr)
fclose(fid);
end

Страницы