Строковый тип данных в языке программирования Pascal

Операции над строками
Операция сцепления (+)
B:=’Вася’
M:=’Эх,’+B+’,’+B+’!’
M=‘Эх, Вася, Вася!’
2. Операции отношения (сравнения двух строк) =,<, >
Сравните (поставьте знак):
‘Иванов’ ‘Иванова’
‘Моряк’ ‘Море’
‘оно’ ‘она’

Стандартные
процедуры и функции
1. Функция Pos(S1, S) - обнаруживает позицию подстроки S1 в строке S
x:= pos(‘Саша’, ‘Шла Саша по шоссе.’)
x=5

2. Функция copy(S, Pos, N) – выделяет из строки S, начиная с позиции Pos, подстроку длиной n символов.
S:=’Информатика’
M:=copy(S,1,4);
M=‘Инфо’

3. Процедура delete(S, pos, N) – удаляет N символов из строки S, начиная с позиции pos.
М:=’Мой родной город’
М:=delete(M,5,7);
M=‘Мой город’

4. Процедура insert(S1, S, pos) – вставляет подстроку S1 в строку S, начиная с позиции pos.
М:=’моток’
М:=insert(‘ло’,M,3);
M=‘молоток’

Определите результат выполнения программы:
Var a, b, c, s: string;
Begin S:=‘Мистика’
A:=copy(S,2,4);
A:=A+’на’;
B:=‘где-то там’;
В:=delete(B,7,4);
S:=‘рядовой’;
C:=copy(s,1,4);
C:=C+’м’
S:=A+’ ’+B+’ ’+C+’!’
writeln(S);
readln;
End.

ЗАДАЧА:
Составьте блок-схему и программу для подсчета во введенной с клавиатуры фразе количества букв «Ф».
Пример:
ФЕДОР КУПИЛ ФОТОАППАРАТ.
Ответ: 2