var s: શબ્દમાળા; i: પૂર્ણાંક; s: = 'ડેલ્ફી પ્રોગ્રામિંગ'; આઇ: = પોટેક્સ ('એચપી પીઆર', એસ, 4); // I = 1;