Вам нужно:
1) перевести строку в массив символов
2) узнать длину полученного массива
3) создать ещё один пустой символьный массив
4) создать цикл, в котором будут записываться элементы первого массива во второй, пока не встретится запятая. если же встретилась запятая, то заканчиваем выполнение цикла
5) узнать размер нового массива, который состоит из букв первого слова
6) вывести последний элемент нового массива, что и будет последней буквой первого слова
алгоритм, в общем-то, такой. Вам нужно лишь перевести это в код на нужном языке программирования
var a,b,c: real;
begin
readln(a,b);
c:=a+b;
if c>=8 then writeln('Молодец!') else writeln( 'Подтянись!')
end.