запрашивается слово перевернуть его в оборотном порядкепаскаль

Запрашивается слово перевернуть его в оборотном порядке
паскаль

Задать свой вопрос
1 ответ

var

  str1, str2: string;

   

begin

  write('Введите слово: ');

  readln(str1);

   

  for var i := str1.Length downto 1 do

     str2 := str2 + str1[i];

   

  write('Результат: ', str2);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт