Question

Написать короткую программу в Pascal,которая пепеворачивает слово в обратную сторону, например слово=оволс,используя стандартные процедуры для работы со строками.

Answer 1

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadlnString.Inverse)
end.

Пример
слово
оволс

Answer 2

Конечно, вот пример программы на Pascal, которая переворачивает слово в обратную сторону, используя стандартные процедуры для работы со строками:

program ReverseWord;

var
  originalWord, reversedWord: string;

procedure ReverseString(var str: string);
var
  i, len: integer;
  tempChar: char;
begin
  len := Length(str);
  for i := 1 to len div 2 do
  begin
    tempChar := str[i];
    str[i] := str[len - i + 1];
    str[len - i + 1] := tempChar;
  end;
end;

begin
  Write('Введите слово: ');
  Readln(originalWord);

reversedWord := originalWord;  // Создаем копию оригинальной строки
  ReverseString(reversedWord);   // Вызываем процедуру для переворота строки

writeln('Перевернутое слово: ', reversedWord);
end.

Программа запрашивает у пользователя ввод слова, затем создает копию этого слова и вызывает процедуру `ReverseString`, которая переворачивает строку. Наконец, программа выводит перевернутое слово.