Задача на строки. Задача на строки. Из слова ПАРАЛЛЕЛОГРАММ получить слово ГРОМ.надо тетем удаления замены всавки сделать, но как именн? очень срочно помогите пожалуйста
var s1,s2:string;
Begin
s1:="ПАРАЛЛЕЛОГРАММ";
s2:="ГРОМ";
for i:= 1 to length(s1) do
begin
if i > length(s2) then s[i]='';
if s1[i]<>s2[i] then s1[i]=s2[i];
writeln(s1);
end;
End.
чем не вариант, если правил нету)