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

В Паскале последнюю букву в слове можно найти по номеру последнего символа строки. В Pascal строки индексируются с 1, поэтому последний символ имеет номер Length(s).

Программа:

pascal
program LastLetter;

var
  s: string;
  last: char;

begin
  writeln('Введите слово:');
  readln(s);

  last := s[Length(s)];

  writeln('Последняя буква в слове: ', last);
end.

Пояснение:

Length(s) возвращает длину слова. Например, если введено слово Pascal, его длина равна 6. Значит, последняя буква находится в s[6], то есть это l.

Можно вывести последнюю букву и без отдельной переменной:

pascal
program LastLetter;

var
  s: string;

begin
  writeln('Введите слово:');
  readln(s);

  writeln('Последняя буква: ', s[Length(s)]);
end.

Пример работы программы:

Введите слово:
школа
Последняя буква: а