|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
11.07.2011, 16:15 | #1 |
Новичок
Джуниор
Регистрация: 11.07.2011
Сообщений: 2
|
Зашифровать зашифровать фамилию, имя, отчество, группу студента
Задание:
Зашифровать фамилию, имя, отчество, группу студента Пример: Иванов Сергей Петрович, ст.гр.08-СТ K = № варианта + 7 (5 + 7 = 12) Для проверки выполнить работу в обратном порядке. Порядок выполнения: 1 Открыть программу Excel. Перейти на второй лист этого документа АЛФА-ВИТ. Начиная с ячейки A1 до A39 набрать алфавит, как указано на рисунке 30, затем выделить весь диапазон алфавита и назначить имя «AБC». 2 Перейти на первый лист документа ШИФРОВАНИЕ и в ячейке B1 набрать текст, который необходимо зашифровать. Пример. Иванов Сергей Петрович, ст.гр.08-НН Примечание - при наборе текста необходимо использовать только те символы, которые входят в алфавит! 3 В ячейке B3 записать формулу: =ПРОПИСН(B1), функция ПРОПИСН переводит символы в строке в прописные буквы (рисунок 31). Рисунок 31 4 В ячейке D3 записать формулу: =ДЛСТР(B3), функция ДЛСТР рассчитывает длину строки, что необходимо пользователю, для кодировки исходной строки (рисунок 32) Рисунок 30 Рисунок 32 5 В ячейке D4 указать значение k, например 12. 6 В столбце А, начиная со строки 6 пронумеровать строки (количество строк которых необходимо пронумеровать указано в ячейке D3 - 35). 7 Далее, начиная с ячейки B6, записать формулу: =ПСТР(B$3;A6;1) что раз-деляет текст необходимый для кодировки на отдельные символы, как показано на рисунке 33. 8 В ячейку C6 записать формулу: =ПОИСКПОЗ(B6;AБC;0). Функция ПО-ИСКПОЗ производит поиск индекса (позиции) символа из столбца B в массиве AБC, который был определен на листе АЛФАВИТ. 9 Получив позицию символа в алфавите AБC, указанном на листе АЛФА-ВИТ, произвести сдвиг алфавита для кодированной последовательности символов, для этого в ячейку D6 записать формулу: =ЕСЛИ(ПОИСКПОЗ(B6;AБC;0)+$D$4>39;ПО ИСКПОЗ(B6;AБC;0)+$D$4-39;ПОИСКПОЗ(B6;AБC;0)+$D$4), которая позволяет производить циклический сдвиг алфавита, на переменную k, находящуюся по адресу D4 (рисунок 34). Рисунок 33 Рисунок 34 10 После получения кода закодированного символа найти его в алфавите. В ячейку E6 записать формулу: =ИНДЕКС(ABC;D6). Функция индекс возвращает символ из массива ABC по указному индексу. 11 Строка 6 копируется столько раз, сколько указано в ячейке D3 минус еди-ница, после чего кодируются все символы строки, указанной в ячейке B1. 12 Для получения строки закодированного текста в ячейке G6 набрать форму-лу: =E6, затем в ячейке на строку ниже =G6&E7, еще на строку ниже =G7&E8 и т.д. В последней строке получится закодированная строка (её выделить) (рисунок 35). Рисунок 35 ДЕШИФРОВАНИЕ: 1 На листе ПРОВЕРКА в ячейку В1 ввести то, что получилось в ячейке G40: 2 В ячейку В3 ввести формулу: ПРОПИСН(В1) 3 Заполнить столбец А: от 1 до 35 (количество символов в Ф.И.О. и группе студента). 4 В ячейку В6 ввести формулу: ПСТР(В$3;A6;1). Затем скопировать ее до ячейки В40. 5 В ячейку С6 ввести формулу: ПОИСКПОЗ(В6;АБС;0). Скопировать далее. 6 В ячейку D6 ввести формулу: =ЕСЛИ(ПОИСКПОЗ(B6;АБС;0)-$D$4<=0;ПОИСКПОЗ(B6;АБС;0)-$D$4+39;ПОИСКПОЗ(B6;АБС;0)-$D$4) 7 В ячейку Е6 ввести формулу: =ИНДЕКС(АБС;D6). 8 В ячейку F6 ввести формулу: E6. В ячейку F7 ввести формулу: F6&E7 и скопировать. В результате получим фразу, которую шифровали (рисунок 36). Рисунок 36 |
11.07.2011, 17:03 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Ввиду резко возросшей активности студентов-бездельников
темы, не содержащие своих наработок, будут закрываться. В этом разделе форума помогают разобраться в Вашем решении, а не штампуют лабы одну за другой. Нет желания делать работу самостоятельно - обращайтесь в раздел Фриланс (там Вам всегда помогут, но не бесплатно) Нет желания платить - выкладывайте свои наработки, и говорите, что конкретно у Вас не получается. В этом случае вы наверняка получите помочь, и ждать её придётся совсем недолго. Впрочем, есть ещё раздел Помощь студентам - если хочется халявы, а денег жалко, - можете обратиться туда (есть небольшой шанс, что там кто-нибудь решит ваши задачки) Ну а если наработок нет, а вы все же надеетесь получить готовое решение от профессионалов, - создавайте новую тему, и сразу указывайте цену, которую Вы готовы заплатить за решение. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Ввести имя, фамилию и отчество в строку. Найти длину строки, вывести фамилию в обратном порядке (Delphi) | --PapaZi-- | Помощь студентам | 7 | 27.03.2011 22:44 |
зашифровать файл | Tycuk | Помощь студентам | 5 | 27.12.2009 12:45 |
Зашифровать текст | Lems11 | Помощь студентам | 6 | 19.12.2009 20:35 |
Зашифровать ссылку | eldar | PHP | 12 | 12.09.2009 16:06 |
Зашифровать папку | San Andreas | Свободное общение | 3 | 12.05.2009 11:32 |