Точка перед заглавной буквой

[udder]

Нашел код на форуме по Паскаль, как работать с этим кодом? Помогите, пожалуйста

PHP код:

program tochka;
uses crt;
const n=10;
var sm:array [1..n] of char;
    s,s1,itog:string;
    i,j:integer;
 
    begin
clrscr;
randomize;
s1:='.';
for i:=1 to n do
 repeat
  sm[i]:=chr(random(255));
 until sm[i] in [' ','A'..'Z','a'..'z'];
writeln('Text: ');
writeln(sm);
s:=sm;
 
for i:=length(sm) downto 1 do
begin
if (sm[i] = UpCase(sm[i]))
then insert(s1,s,i);
end;
writeln;
writeln('Obrabotanniy text: ');
writeln(s);
readln;
end. 


[веломан]

а чего хотел получить то?

[udder]

Сообщение от веломан

а чего хотел получить то?

Программу, которая проставит точки перед заглавной буквой в текстовиках

[веломан]

в гугле валом таких программ на любом языке
найди свой

[digg]

ебать паскать )) сколько лет я его не видел )

[Matt Cutts]

В notepad++ или другом редакторе сделать такую замену:

как работать с этим кодом?

Компилировать в Lazarus

[udder]

@Matt Cutts Спасибо, ты лучший

[smart]

В N++ есть плагин TextFX в котором есть конструктор регулярок.

[alter13]

Почему не на Бейсике или Лиспе?

[Skyworker]

Сообщение от alter13

Почему не на Бейсике или Лиспе?

Или на Ассемблере!?