Расстояние между двумя словами определяется минимальным количеством основных операций с буквами слов, которое позволяет заменить первое слово на второе. основные операции с буквами слов следующие: • вставить один символ в слово, • удалить один символ из слова, • заменить один символ в слове другим символом. например, расстояние между словом «kitten» и словом «sitting» равно 3. основные необходимые операции: 1. kitten → sitten (замените в слове «kitten» букву «k» на букву «s»), 2. sitten → sittin (замените в слове «sitten» букву «e» на букву «i»), 3. sittin → sitting (вставьте в конце слова «sittin» букву «g»). вопрос: каково минимальное расстояние между словами «length» и «french»?

#include <iostream>
#include <list>

using namespace std;

int main() {
    list<int>mylist;
    //Делаем со списком, что хотим
    mylist.push_back(1);
    mylist.push_back(2);
    mylist.push_back(3);
    mylist.push_back(-4);
    mylist.push_back(5);
    for (auto i : mylist) {
        cout << i << " ";
    }
    cout << "\n";
    //Удаляем последний отрицательный элемент
    auto it = mylist.end();
    while (*it > 0) {
        if (it == mylist.begin()) {
            cout << "Not found.\n";
            return 0;
        }
        it--;
    }
    //Делаем со списком, что хотим
    mylist.erase(it);
    for (auto i : mylist){
        cout << i << " ";
    }
    return 0;
}

Var a: byte; b:integer;
Begin 
writeln('Введите день месяца');
readln(b);
writeln('Введите номер месяца');   
Readln(a);    
          Case a of        
1: writeln(b,' янавря');        
2: writeln(b,' февраля');      
3: writeln(b,' марта ');        
4: writeln(b,' апреля ');      
5: writeln(b,' мая');      
6: writeln(b,' июня ');        
7: writeln(b,' июля');       
8: writeln(b,' августа');     
9: writeln(b,' сентября');     
10: writeln(b,' октября');     
11: writeln(b,' ноября');       
12: writeln(b,' декабря');     
else writeln('Месяца №', a,'нет');   
end;       
end.