• Синтаксис языка
• Типы данных
• Стандартные модули
• Процедуры и функции
• Зарезервированные слова
• Директивы компилятора
• Сообщения об ошибках
• Примеры программ
• Описание среды разработки

pos.pas

Пример программы для функци Pos.

Код примера

 {Pos.PAS}
 
 { Пример программы для функци Pos }
 
 Var S : String;
 
 Begin
  S:='   123.5';
  { Преобразовываем пробелы в нули }
  While Pos(' ', S) > 0 Do S[Pos(' ', S)]:='0';
  WriteLn(S);
 End.

Скачать pos.pas