3
{ Program to demonstrate the Pos function. }
9
S:='The first space in this sentence is at position : ';
10
Writeln (S,pos(' ',S));
11
S:='The last letter of the alphabet doesn''t appear in this sentence ';
12
If (Pos ('Z',S)=0) and (Pos('z',S)=0) then