Допишите программу!
Программа в Паскале по теме: " Строки"
Задача:
Дан текст, слова которого отделяются друг от друга пробелами. Удалить из тек-ста все повторно встречающиеся слова, если количества букв в первом и последнем словах совпадают.
Распечатать исходный текст, количество букв в первом и последнем словах, по-лученный текст.
Code
program nm;
var c,m,a,s:string;
j,i,h:integer;
start,dlina:integer;
max:integer;
t: boolean;
const
znaki = ['.',',',' ','!','?','-',':',';'];
begin
Write('Введите текст: ');
Readln(s);
i:=1;
h:=1;
start:=0;
a:=s;
j:=0;
m:=s;
max:=0;
