PASCAL stringi "ile przestawień liter"

0

Witam,
mam taki problem - potrzebuje napisać program w pascalu w którym wprowadzamy dwa stringi (o takiej samej długości i takich samych literach tylko duże litery alfabetu angielskiego(uff;p) ) a on podaje nam minimalną liczbę zamian sąsiednich liter tekstu1 w tekst 2. np QWE, WEQ = 2 zamiany;
Próbowałem zacząć:

;

program zad_teksy;
uses crt;
var
tekst1, tekst2 : string[25];
<del>tab1, tab2 :array[1..25] of integer</del>
i : integer

begin

for i:=1 to length(tekst1) do
begin
<del>tekst[i]:=tab1[i]</del>
end;

readln;
end.

i pustka w mózgu, może ktoś mi pomóc/nasunąć odpowiedź jak to rozwiązać?
Z góry wielkie dzięki za zainteresowanie tematem.

0

kolejny myśli, że ktoś za niego zrobi zadanie z OI

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0