'abcd' > 'abcD' { 'd'>'D' } 
  'abcd' > 'abc' { 'd'>'' } 
  'abc' < 'axxc' { 'b'<'x' } 
  'abcd' = 'abcd' 

  for i:= 1 to N div 2 do 
    begin
      C:= S[i];
      S[i]:= S[N-i+1];
      S[N-i+1]:= C  
      Writeln(S);                                       
    end;    { �������� ����� ��������� ������ ������:  "������" }

  for i:=1 to N do if S[i]=' ' then writeln      ('������ ������ ������');
  for i:=1 to N do if S[i]='/' then S[i]:='\'; {������ ������� "/" �� "\"}

  for i:=1 to N do S[i]:= chr(ord(S[i])+2);   
  {�������������� �������� ��������  � ������� � ����� ������� �� ��� �������}

• ������� Length(s) ������ ����� ������ s.
• ������� Concat(s1,s2,..,sn) ��������� ������ s1+s2+..+sn.
• ������� Copy(s,p,k) ���������� �������� ������ s, ������� ���������� � ������� p � ����� ����� k.
• ������� Pos(s1,s) ���� ������ ��������� ��������� s1 � ������ s � ���������� ����� ������� ������� s1 � ������ s ��� 0 ���� �� �����.
• ��������� Delete(s,p,k) ������� �� ������ s ��������, ������� ���������� � ������� p � ����� ����� k.
• ��������� Insert(s,s1,p) ��������� � ������ s ��������� s1, ������� � �������� ������� p.

  var s,x,y,z : string; 
begin 
  x := 'turbo'; 
  y := 'pascal'; 
  z := x+' '+y; { z='turbo pascal' } 
  s := ''; { ������ ������ } 
  for c:='a' to 'z' do s:=s+c; { s='abcd..xyz' } 
  writeln(s); 
end. 



—одержание
   
”чебник по ¤зыку Pascal         
Ћабораторные работы по программированию         
—правочник