Написать программу, заменяющую все подсловия abc на def. Удалить все пробелы и точки. Процедуры НЕ использовать.
После значительной мозговой атаки получилось у меня вот что :
str: string[1..255];
for i = 1 to lenght (str) do
begin
if ((str[i]="a") and
(str[i+1]="b") and
(str[i+2]="c")) then
str[i]:="d";
str[i+1]:="e";
str[i+2]:="f";
if (str[j] = ".") then
for j = i+1 to lenght
str[j-1] := str [j];
помогите привести задачку к окончательному варианту, а то скоро сдавать