Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 28.12.2013
Сообщений: 42

зашифровать, а потом расшифровать?

08.01.2014, 21:53. Показов 1363. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогитеее. жуть какая-то
Дано предложение,зашифрованное по правилу:поместить символы предложения, расположенные на четных позициях строки, а затем, в обратном порядке, все символы, расположенные на нечетных позициях (например, строка "Программа" превратится в "ргамамроП"). Расшифровать это предложение.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.01.2014, 21:53
Ответы с готовыми решениями:

Зашифровать, расшифровать текст методом сдвига алфавита
Всем привет, вот до утра надо написать программу:(что то не получается. Помогите пожалуйста! вот задание: чтобы зашифровать текст,...

Пользуясь шифром Полибия зашифровать, а потом расшифровать текст введённый пользователем
Смысл задания в том, чтобы пользуясь шифром Полибия зашифровать, а потом расшифровать текст введённый пользователем. Вот написал цикл, а...

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

4
 Аватар для Антихакер32
1201 / 473 / 46
Регистрация: 06.01.2014
Сообщений: 1,797
Записей в блоге: 19
08.01.2014, 22:39
Ну это ещё мне надо засесть на час
а к финишу меня The trick опередит )

Добавлено через 7 минут
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Public Sub Form_Load()
    Dim s$, s1$, f&, i&
    
    s = "Программа"
    s1 = s
    'Зашифровать
    i = 1
    For f = Len(s) To 1 Step -2
        Mid(s1, i, 1) = Mid(s, f, 1)
        i = i + 2
    Next
    MsgBox s1
    'Расшифровать
    s = s1
    i = 1
    For f = Len(s) To 1 Step -2
        Mid(s1, i, 1) = Mid(s, f, 1)
        i = i + 2
    Next
    MsgBox s1
    End
End Sub
Добавлено через 30 минут
kseniya0607 вы где...
вам хоть этот мой ответ понравился ?...
2
0 / 0 / 0
Регистрация: 28.12.2013
Сообщений: 42
08.01.2014, 23:30  [ТС]
дааа) спасибо огромноее)
0
 Аватар для Антихакер32
1201 / 473 / 46
Регистрация: 06.01.2014
Сообщений: 1,797
Записей в блоге: 19
08.01.2014, 23:33
Да не зачто, там не слишком было сложно, я поначалу испугался как и вы ) а потом сделал )
1
 Аватар для Pro_grammer
6807 / 2839 / 527
Регистрация: 24.04.2011
Сообщений: 5,308
Записей в блоге: 10
09.01.2014, 12:12
Цитата Сообщение от FelixMacintosh Посмотреть сообщение
Да не зачто, там не слишком было сложно, я поначалу испугался как и вы ) а потом сделал )
Жора, когда Вы уже из бана выйдете? Реально не хватает Вашего наивного задора!
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.01.2014, 12:12
Помогаю со студенческими работами здесь

Зашифровать и расшифровать сообщение
Помогите пожалуйста решить задачу! У нас есть сообщение, оно состоит из больших латинских букв и точек. Чтобы скрыть его смысл, мы...

Зашифровать и расшифровать текст
Здравствуйте! Подскажите пожалуйста! Как зашифровать строку, что бы потом аккуратно расшифровать? Вод код, он зашифровавает....

Зашифровать и расшифровать AnsiString
Добрый день! Возникла необходимость шифровать и дешифровать AnsiString Нашел в сети функции шифрования const char Base64Table =...

Зашифровать и расшифровать текст
Зашифровать и расшифровать текст, находящийся в строкe с именем Fin. Закодированный (расшифрованный)текст сохранить в строку Fout. Для...

Зашифровать в js, расшифровать в php
$pass = '1234'; $key = 'secret'; $alg = MCRYPT_BLOWFISH; $iv = mcrypt_create_iv(mcrypt_get_block_size($alg),MCRYPT_DEV_URANDOM); ...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru