fkn+antitotal

Fatal error: Call to undefined function mb_strpos(

Раскомментируйте в файле настроек php.ini подключение расширения:

extension=php_mbstring.dll

(уберите точку с запятой в начале строки, сохраните файл) и перезапустите апач.

Используйте оператор + например:

my_sequence += currentSymbol;

или^

my_sequence :=  seq1 + ' | ' + seq2; 

(работает в abc pasacal)

Паскаль в классическом варианте подраузумевает, что длинна строки -- переменной типа string ограничивается 255 символами.

В связи с чем бесконечные последовательности из командной строки следует считывать посимвольно в таком стиле.

Источники:

• http://wiki.freepascal.org/Character_and...
• http://informatics.mccme.ru/mod/book/vie...

Рассматривая предыдущее решение, можно заметить, что там ввод пользователя считывался разом в одну переменную типа string, но на длину переменной этого типа имеется ограничение в 255 символов, таким образом, на экзамене оценка может быть снижена за не универсальность кода.

(в процессе)

В Паскале в процедуры и функции передавать значения можно двумя способами:

1. По значению (без var перед именем переменной в заголовке процедуры/функции)
2. По ссылке (с var перед именем переменной в заголовке процедуры/функции)

это зависит от перечисления принимаемых функций переменных с var или без

Пример передачи значений в процедуру

Рассмотрим пример программы с процедурой:

Чтобы читать только один символ из очередного введенного фрагмента (на деле это всегд будет 1-ый символ) используйте такое решение (читаем в переменную типа char, а не string, как например здесь):

Program FirstCharProg;
var // секция объявления переменных

   firstChar:  char; // сюда считаем последовательность символов

begin // тело программы
 
   Writeln('Введите последовательность: ');
   Readln(firstChar);  // cчитываем 1-ый символ
    
   Writeln(firstChar);
    
end.

Установка

Чтобы установить последнюю версию этого замечательного фрэймворка с помощью Composer используйте команду:

composer create-project symfony/framework-standard-edition имяпроекта

Открываем "index" приложения

После установки по-идее нужно будет открыть адрес типа:

/web/app_dev.php
_

например, (в зависимости от вашего локального доменного имени, например, пусть оно настроено как symtest.local):

Для прерывания работы цикла ипользуйте инструкцию break, например:

for i:=1 to len do // обходим последовательность 
   begin

      if ((my_sequence[i] = stop_symb) then  // если выполнено какое-то условие 
          break; // выходим из текущего цикла

    end;

Условие задачи: