Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке.

@petrvolkov · Регистрация: 31.05.2009

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

@CoolCat · 31.05.2009, 17:38

дето так

var
str : string;
strN : string;
i : integer;

begin
str := 'Hello';
for i := 1 to Length(str) do
strN[i] := str[Length(str) - i + 1];
writeln(strN);
end.

Кажись так, но могу ошибаться

@Delphin_KKC · 31.05.2009, 18:49

Так, имхо, лучше:

Pascal
1
2
3
4
5
6
7
8
9
10
var 
 str : string;
 strN : string;
 i : integer;
begin 
str := 'Hello';
strN:='';
for i := Length(str) downto 1 do strN := strN+str[i];
writeln(strN);
end.

@barmalei_slv · 31.05.2009, 19:09

так ещё попробуй))

Pascal
1
2
for i:=length(str) downto 1 do
write(str[i]);

@petrvolkov · 31.05.2009, 20:41 **[ТС]**

Спасибо за помощь )

@barmalei_slv · 31.05.2009, 20:45

ты дома оттестируй всепроги, если работать не будет скинь код сюда целиком, там уже разберёмся

@Delphin_KKC · 31.05.2009, 20:50

Работать должны все. Но вот подход CoolCat'а не совсем корректный и на некоторых компиляторах может выдавать Range error.

@Puporev · 31.05.2009, 22:20

Но вот подход CoolCat'а не совсем корректный и на некоторых компиляторах может выдавать Range error.

Чем же симметричная перестановка массива некорректна и на каких это компиляторах выдаст ошибку?

@Delphin_KKC · 01.06.2009, 08:01

Когда искал компилятор с интерфейсом получше борланда то пока нашёл TMT Pascal перепробовал несколько штук. И помнится попался один (сейчас уже не вспомню название ибо это лет шесть назад было), который выдавал Range Error в описаном случае, если только не объявить переменную как string[255]. Случай достаточно редкий, но всёж имел место.
Если массив создан в памяти - то всё норм.

@Puporev · 01.06.2009, 08:18

лучай достаточно редкий, но всёж имел место.

Короче, выпендрился.

@Delphin_KKC · 01.06.2009, 08:23

Я тогда на поиск почему ж не работают те три строчки почти сутки убил. Вот и хотелось бы чтоб другие не повторяли моей ошибки.

@Puporev · 01.06.2009, 08:29

Что же, из-за какого-то кривого компилятора, которого вероятнее всего ни у кого уже и нет отказаться вообще от конструкции
var s:string;?
Тогда напишите в Министерство образования и в прочие инстанции о своем открытии, чтоб это официально запретили.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .	SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .

@petrvolkov 0 / 0 / 0 Регистрация: 31.05.2009 Сообщений: 9

	Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке. 31.05.2009, 17:16. Показов 19115. Ответов 11 Метки нет (Все метки) Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке. 0

@CoolCat 5 / 5 / 0 Регистрация: 31.05.2009 Сообщений: 13
	31.05.2009, 17:38
	дето так var str : string; strN : string; i : integer; begin str := 'Hello'; for i := 1 to Length(str) do strN[i] := str[Length(str) - i + 1]; writeln(strN); end. Кажись так, но могу ошибаться 2

@petrvolkov 0 / 0 / 0 Регистрация: 31.05.2009 Сообщений: 9
	31.05.2009, 20:41 [ТС]
	Спасибо за помощь ) 0

@barmalei_slv 23 / 23 / 13 Регистрация: 29.10.2008 Сообщений: 69
	31.05.2009, 20:45
	ты дома оттестируй всепроги, если работать не будет скинь код сюда целиком, там уже разберёмся 0

@Delphin_KKC UNIX-way 712 / 495 / 49 Регистрация: 15.01.2009 Сообщений: 1,720
	31.05.2009, 20:50
	Работать должны все. Но вот подход CoolCat'а не совсем корректный и на некоторых компиляторах может выдавать Range error. 0

@Delphin_KKC UNIX-way 712 / 495 / 49 Регистрация: 15.01.2009 Сообщений: 1,720
	01.06.2009, 08:01
	Когда искал компилятор с интерфейсом получше борланда то пока нашёл TMT Pascal перепробовал несколько штук. И помнится попался один (сейчас уже не вспомню название ибо это лет шесть назад было), который выдавал Range Error в описаном случае, если только не объявить переменную как string[255]. Случай достаточно редкий, но всёж имел место. Если массив создан в памяти - то всё норм. 0

@Delphin_KKC UNIX-way 712 / 495 / 49 Регистрация: 15.01.2009 Сообщений: 1,720
	01.06.2009, 08:23
	Я тогда на поиск почему ж не работают те три строчки почти сутки убил. Вот и хотелось бы чтоб другие не повторяли моей ошибки. 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	01.06.2009, 08:29
	Что же, из-за какого-то кривого компилятора, которого вероятнее всего ни у кого уже и нет отказаться вообще от конструкции var s:string;? Тогда напишите в Министерство образования и в прочие инстанции о своем открытии, чтоб это официально запретили. 0