Определить номера позиций в строке символа пробел - Turbo Pascal

Формулировка задачи:

Определить номера позиций в строке символа пробел Друзья помогите пожалуйста

Код к задаче: «Определить номера позиций в строке символа пробел - Turbo Pascal»

textual
program SpacesPos;
 
const strExample = 'Проверочная строка, которая содержит несколько пробелов.';
 
var i, nStrLen : Integer;
 
begin
 nStrLen:=Length(strExample);
 Write('Позиции пробелов в строке:');
 
 For i:=1 to nStrLen do
  If strExample[i]=' ' then
    Write(' ',i);
end.

7   голосов, оценка 3.857 из 5


СОХРАНИТЬ ССЫЛКУ
Похожие ответы