Символы и Строки Pascal ABC

@HaXoq4uBbIu' :) · Регистрация: 11.01.2011

Студворк — интернет-сервис помощи студентам

Не знаком мне этот вид задачи.... Помогите...
Дана строка-предложение на русском языке. Зашифровать ее, b{onkm циклическую замену каждой буквы на следующую за ней в алфавите и сохраняя при этом регистр букв ("А" перейдет в "Б", "а" — в "б", "Б" — в "В", "я" — в "а" и т.д.). Букву "ё" в алфавите не учитывать ("е" должна переходить в "ж"). Знаки препинания и пробелы не изменять.

@Jazon_deenAlt · 13.01.2011, 13:08

HaXoq4uBbIu' , вот что вам поможет:

Функция Ord возвращает целочисленное значение для любого перечислимого типа Arg.

Это используется преимущественно, чтобы преобразовать символы или перечисления в их числовые эквиваленты.

Функция Chr конвертирует целое число IntValue или в AnsiChar или в WideChar
Набор символов ansi включает управляющие символы типа Chr(27), означающего escape.

Char(65) дает 'A'

Обратите внимание, что ^A эквивалентно Char(1).

например:

Pascal
1
chr(ord(s)+1)

выдаст смещенный вперед символ, дальше я думаю вам будет несложно)

@HaXoq4uBbIu' :) · 13.01.2011, 13:12 **[ТС]**

Благодарю! Освобожусь сделаю не освобожусь не сделаю я уже отчет делаю думал усовия последних задач закину решат ! а тут просто наводка помощь ну за это спс....!

@Jazon_deenAlt · 13.01.2011, 13:15

HaXoq4uBbIu' : ), конечно наводка) вы же находчивый, вы выкрутитесь) а много таких кто ненаходчивый им больше полный листинг нужен)

Новые блоги и статьи Все статьи Все блоги /
1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .

@HaXoq4uBbIu' :) 1 / 1 / 1 Регистрация: 11.01.2011 Сообщений: 44

	Символы и Строки Pascal ABC 13.01.2011, 12:56. Показов 1587. Ответов 3 Метки нет (Все метки) Не знаком мне этот вид задачи.... Помогите... Дана строка-предложение на русском языке. Зашифровать ее, b{onkm циклическую замену каждой буквы на следующую за ней в алфавите и сохраняя при этом регистр букв ("А" перейдет в "Б", "а" — в "б", "Б" — в "В", "я" — в "а" и т.д.). Букву "ё" в алфавите не учитывать ("е" должна переходить в "ж"). Знаки препинания и пробелы не изменять. 0

@HaXoq4uBbIu' :) 1 / 1 / 1 Регистрация: 11.01.2011 Сообщений: 44
	13.01.2011, 13:12 [ТС]
	Благодарю! Освобожусь сделаю не освобожусь не сделаю я уже отчет делаю думал усовия последних задач закину решат ! а тут просто наводка помощь ну за это спс....! 0

@Jazon_deenAlt 4117 / 999 / 191 Регистрация: 09.04.2009 Сообщений: 4,223
	13.01.2011, 13:15
	HaXoq4uBbIu' : ), конечно наводка) вы же находчивый, вы выкрутитесь) а много таких кто ненаходчивый им больше полный листинг нужен) 0