Programmierung eines Anagramm-Generators

3 Lösungen

#211

Fortgeschrittener - C# von hollst - 31.05.2018 um 14:02 Uhr

Unter einem (vollständigen) Anagramm eines Basiswortes versteht man
sinnvolle Wörter, die aus den gleichen Buchstaben wie
das Basiswort zusammengesetzt sind. Z. B. sind zum Basiswort TOR die Wörter
ROT und ORT Anagramme. Die Folge OTR ist kein Anagramm (kein sinnvolles Wort).

Für den zu programmierenden Anagramm-Generator, der ein Basiswort entgegennehmen
und eine Liste sinnvoller Anagramme ausgeben soll (Bild 1), wird natürlich eine
Liste aller sinnvollen Wörter einer (natürlichen) Sprache benötigt. Mein Vorschlag
ist es, sich den Textfile germany.dic von

https://sourceforge.net/projects/germandict/

herunterzuladen. Er enthält knapp 2.000.000 Einträge "sinnvoller" deutscher Wörter,
darunter auch eines meiner Lieblingswörter:

Rindfleischetikettierungsüberwachungsaufgabenübertragungsgesetz.

Dieses Wort steht in der Tat sogar im Duden, allerdings nur an Stelle zwei der Wurmwörter,
den ersten Platz hat

Grundstücksverkehrsgenehmigungszuständigkeitsübertragungsverordnung.

Ja, aber das nur zum Schmunzeln am Rande. Viel Spaß!

Bitte melden Sie sich an um zur Aufgabenbeschreibung eine Frage zu stellen.

Frage stellen

Bitte melden Sie sich an um eine Lösung einzureichen.

Lösung einreichen

von daniel59 (4260 Punkte) - 05.06.2018 um 11:29 Uhr

C#-Code

using System;
using System.Collections.Generic;
using System.Linq;

namespace ConsoleAnagrannGenerator
{
    class Program
    {
        static readonly string[] dictionary = Properties.Resources.german.Split('\r', '\n').Where(a => !string.IsNullOrWhiteSpace(a)).Select(a => a.ToLower()).Distinct().ToArray();
        static void Main(string[] args)
        {
            Console.WriteLine("----- Anagramm Generator -----");

            do
            {
                Console.Write("Wort eingeben: ");
                string word = Console.ReadLine();

                var anagramms = FindAnagramms(word);
                Console.WriteLine("Folgende Anagramme wurden gefunden:");
                if(anagramms.Count() == 0)
                {
                    Console.WriteLine("Keine Anagramme gefunden");
                }
                else
                {
                    foreach(string s in anagramms)
                    {
                        Console.WriteLine(s);
                    }
                }
                Console.WriteLine();
                Console.Write("Neues Wort eingeben? (J/N): ");
                if(Console.ReadKey().Key != ConsoleKey.J)
                {
                    break;
                }
                else
                {
                    Console.WriteLine();
                }


            } while (true);
        }

        static IEnumerable<string> FindAnagramms(string orig)
        {
            Dictionary<char, int> charCount = new Dictionary<char, int>();

            foreach (char c in orig.ToLower())
            {
                if (!charCount.ContainsKey(c))
                {
                    charCount.Add(c, 0);
                }

                charCount[c]++;
            }


            IEnumerable<string> tempDic = dictionary.Where(a => a.Length == orig.Length);
            foreach (var item in charCount)
            {
                tempDic = tempDic.Where(a => a.Count(b => b == item.Key) == item.Value);
            }

            return tempDic;
        }
    }
}