Перевірка знань 

Заповніть пропуски таким чином, щоб змінна S,
після виконання заданої частини програми, отримала
значення 'формат'

       s:='форт'
       Insert('ма',3(s),4)

Яким буде значення змінної s після виконання наступних команд?

s:='Microsoft';
delete(s,2,5);
s[4]:='S';

Яким буде значення змінної S після виконання
заданої частини програми?

        S:='program';

        insert('no',s,3) ;

Яким буде значення змінної S після виконання
заданої частини програми?

        S:='computer';

        Delete(s,3,4) ;

Заповніть пропуски таким чином, щоб змінна S,
після виконання заданої частини програми, отримала
значення 'ритм'

      p:='алгоритмізація'
      s:=copy(s(p),5,8(4))

Для даного фрагмента програми :

       Var
          s :string;
       ......................

          s[i]:='w'

       ...................... 

 s - це

Заповніть пропуски таким чином, щоб змінна S,
після виконання заданої частини програми, отримала
значення 'формування'

       s:='форматування'
       Delete(s,4(5),6(2))

Для даного фрагмента програми :

       Var
          s :string;
       ......................

          s[i]:='w'

       ...................... 

 s[i] - це

Яким буде значення змінної s після виконання наступних команд?

s:='program';
s:=insert(Copy(s,1,2),s,3);
s[2]:='o';

Для даного фрагмента програми :

       Var
          s :string;
       ......................

          s[i]:='w'

       ...................... 

 i - це

Яким буде значення змінної s після виконання наступних команд?

s:='computer';
s:=Copy(s,Length(s) div 2,3);
s:=s+s[3];