: Рядковий тип даних STRING та основні команди роботи з ним.
Як один з прикладів використання різних процедур та фукцій розглянемо програму яка знаходить в тексті слово "kit" та замінює його на слово "pes".
program kit_pes;
Var St:String;
a:integer;
Begin
Readln(St); {Введем рядок з котом}
a:=pos('кiт',St);{знайдемо де сидить кiт}
Delete(St,a,3);{заберем кота в мiшок}
Insert('пес',St,a); {посадим песика}
Writeln(St); {подивимось чи йому там зручно}
Readln;
End.
Така програма шукає в тексті лише одного "кота". Рекомендую самостійно написати програму для пошуку всіх існуючих в тексті "котів" та заміни їх на "собак".