Символдық мәліметтермен амалдар орындау

мәтіндік тип, файл аттарын белгілеуде қолданылады.
LENGTH (x) – мәтін ұзындығын

анықтайтын операциясы.
Length (‘ABCD’) = 4.     Length (‘a f 5 1’) = 7.
 Copy (St, Poz,N) – St сөз тіркесінің Poz нөмірлік символынан бастап қатар тұрған N символ көшіріліп алынады.  St – тіркестік айнымалы, Poz, N – бүтін сандар.
Concat(s1, s2,…,sn) – жақша ішіндегі тіркестік айнымалылар мәндерін орналасқан орындары бойынша біріктіреді.
Delete(S,Poz,N) – S сөз тіркесі символдарының Poz нөмірінен бастап, N символды өшіреді де нәтижені қайта S мәні ретінде жазады, мұнда  Poz<255.
upcase(ch)- кіші латын әріптерін бас әріптерге айналдырады, басқа символдарға әсер етпейді.

шығаратын программа құр.

Program E5;
var x,d,a:string;
i,k:integer;
Begin
Writeln('soz engiz');
Readln(x);
for i:=length(x) downto 1 do
write(

copy(x,i,1));
end.

программасын құрыңыз. 
Program austir;
Var s:string;
k:byte;
begin
readln(s);
for k:=1 to length (s)

do
s[K]:=Upcase (s[k]);
writeln(s);
end.

купила капюшон” сөйлемін құрастыратын алгоритм жазу және оның ұзындығын анықтау

керек.
 
Program e2;
const a='ку'; b='шка'; c='юшон'; d='пила';
var t: string [100];
begin
t:=a+a+b+' '+a+a+copy(c,2,3)+a+' '+a+d+' '+copy(b,2,2)+copy(d,1,1)+c;
writeln(' t:=', t);
end.

LENGTH (x) –
Copy (St, Poz,N) –
Concat(s1, s2,…,sn) –
Delete(S,Poz,N) –
upcase(ch)-

арқарда марқа арқар бар.