Всем . у меня проблема с cinema 4d r20, когда я ее скачал, то при выборе языков это (на скрине), подскажите что делать)

// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! begin   var s: =readlnstring('введите текст: ');   var p: =pos('.',s); // позиция точки   if p> 0 then s: =s[: p]; // отбросим до конца все, начиная с точки   writeln('найдено слов: ',s.matchvalues('\b[a-zа-яё][a-zа-яё]+\b').count) end. примеры введите текст: test и только тест сегодня15 января язык pascal версия 3-3. найдено слов: 2 введите текст: и сидит, сидит зловещий ворон черный ворон вещий. найдено слов: 2 введите текст: почему же мы с тобой    пишем с буквы прописной: таня, ваня, мила, нина, коля, петя и ирина. найдено слов: 9

Const   n=15; var   a: array[1..n] of integer;   i,t: integer; begin   randomize;   writeln('исходный массив');   for i: =1 to n do begin       a[i]: =random(50)+10;       write(a[i]: 3)       end;   writeln;   for i: =1 to n div 2 do       begin t: =a[i]; a[i]: =a[n-i+1]; a[n-i+1]: =t end;   writeln('результирующий массив');   for i: =1 to n do write(a[i]: 3);   writeln; end. пример исходный массив   25 19 47 34 22 54 52 11 40 13 25 47 29 50 58 результирующий массив   58 50 29 47 25 13 40 11 52 54 22 34 47 19 25