Question

В паскале, найти последнюю букву в слове (составить программу)

Answer 1

Программа для вывода последнего символа (буквы) в ведённой строке.

var s:string;

begin

readln(s); {Ввод слова}

writeln(s[s.Length]); {Вывод последнего символа в ведённой строке}

end.

Answer 2

Чтобы написать программу на языке Паскаль для нахождения последней буквы в слове, следуйте этим шагам:

1. Запросите у пользователя ввод слова.
2. Найдите длину слова.
3. Получите последний символ слова, используя его длину.

Вот пример программы на языке Паскаль:

pascalCopy code
program FindLastLetter;

var
  word: string;
  lastLetter: char;

begin
  // Введите слово
  write('Введите слово: ');
  readln(word);

  // Получите длину слова
  if Length(word) > 0 then
  begin
    // Получите последний символ слова
    lastLetter := word[Length(word)];

    // Выведите последнюю букву
    writeln('Последняя буква в слове: ', lastLetter);
  end
  else
    writeln('Слово пустое.');
end.

Программа запрашивает у пользователя ввести слово, затем находит последний символ этого слова и выводит его на экран. Обратите внимание, что в Pascal индексация строк начинается с 1, поэтому мы используем Length(word) для получения длины слова и word[Length(word)] для получения последнего символа.