Составить программу, которая позволяет найти позицию пробела в строке s, состоящей из двух слов, разделённых пробелом.

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;

ПЕР
  строка: РЯД 100 ИЗ ЗНАК;
  сч: ЦЕЛ;

УКАЗ
  Приём.Строка(строка);
  ОТ сч := 0 ДО ДЛИНА(строка) - 1 ВЫП
    ЕСЛИ строка[сч] = " " ТО
      Вывод.ЧЦел("^d", сч, 0, 0, 0)
    КОН
  КОН

КОН Задание.