Вобщем такая задачка :
В заданном предложении заменить все строчные латинские буквы прописными.
Определить ,сколько раз в преобразованном предложении встречается
сочетание символов "А+В" Напечатать исходный и преобразованный тексты,
а также число встретившихся сочетаний.

Возникает сразу 2 вопроса:
-Как перевести строчные в прописные (говорят что както при помощи таблицы ASCII)
и -Как вообще понимать второе предложение?)))

Помогите пожалуйста кто силён?... я в тупике

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

for i := 1 to length(s) do
  s[i] := UpCase(s[i]);

Благодарю!!! Работает!!))) Ну а как же всётаки быть со вторым вопросом?

Вот через таблицу, но для латинского алфавита:

  for i:=1 to length(s) do  if (ord(s[i])>=97) and (ord(s[i])<=122) then s[i]:=chr(ord(s[i])-32);
end.

Во-первых, сочетание AB или именно А+B..
Вообще можно через pos('AB",s).. ищем, если нашли, то увеличили счетчик, а найденное сочетание удалили, и так пока не получится, что подстроки нет.. Правда это не самый лучший вариант.. придется исходную строку копировать в другую переменную, иначе потеряем..

Вот и именно что с плюсом

Ну это в целом ничего не меняет.. просто будешь искать pos('A+B',s) и все))
а можно еще так:

if (s[i]='A') and (s[i+1]='+') and (s[i+2]='B') then inc(kol);

Ну а что принять в качестве А и В ? любые 2 буквы чтоли?

Хм.. знаешь, вот я это "А+B" поняла как сочетание трех конкретных символов.. если тебе непонятно задание, то лучше спросить у препода..

А! ,всё, допёрло!!))) Айра спасибо! как всё оказывается просто было!)))

Ай-яй-яй Оля, если будем удалять можем нарваться на неприятности... К примеру:

s := 'hello A+B world AA+B+B !!!';

Что получим? Сколько раз 'A+B' встречается в строке? Внимательней с такими вещами...

а если удалять не А+В, а весь кусок строки, который заканчивается этим сочетанием?
ну или наоборот - копировать "хвост"...

ой.. не заметила..
Тогда придется все через индексы делать..

Проще забить найденный кусок "левыми" символами.