Sanayhdistelmät

P3P

Siis on satoja erilaisia sanoja joista haluaisin
muodostaa KOLMEN SANAN YHDISTELMIÄ.
Keksitty esimerkki: rakas - lastenkoti - pakkanen - hyllytettiin - joulupukki.

Näistä pitäisi muodostaa lauseita joissa kussakin on kolme sanaa. (Esim. yksi kappale: lastenkoti joulupukki hyllytettiin) Tästä 5 sanan ryhmästä tietysti niitä tulee jo aika monta erilaista kolmen sanan lausetta.

Miten Pascalilla?

4

356

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • P3P

      Lomakkeella Button1 ja Memo1


      procedure TForm1.Button1Click(Sender: TObject);
      var i,j,k:integer;
      begin
      Memo1.Clear;
      sl:=TStringList.Create;
      sl.LoadFromFile('sanat.txt');
      for i := 0 to sl.Count-1 do
      for j := 0 to sl.Count-1 do
      for k := 0 to sl.Count-1 do
      if (sl.Strings[i] sl.Strings[j])and
      (sl.Strings[i] sl.Strings[k]) and
      (sl.Strings[j] sl.Strings[k]) then
      Memo1.Lines.Add(sl.Strings[i] ' ' sl.Strings[j] ' ' sl.Strings[k] );

      end;

      • ------------------

        Vähän monipuolisempi saadaan lisäämällä

        ..
        sl:=TStringList.Create;
        sl2:=TStringList.Create;
        sl2.LoadFromFile('sanat.txt');
        sl2.Delimiter:=' ';
        sl2.QuoteChar:=' ';
        sl.Delimiter:=' ';
        sl.DelimitedText:=sl2.DelimitedText;
        for i := 0 to sl.Count-1 do
        ...

    • Epäilijä
      • asdassd

        Kyl toi oli ihan asiallinen. Turhaan huolestuit.
        Näitä Delphillä (tai Pascalilla) tehtyjä
        koodeja on mukava lukea. Lisäksi osa näistä Delphi alueelle kirjoittajista on tosi asiantuntijoita!

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Riikka vie Suomen kohta ykköseksi työttömyyskisassa

      Espanja: 10,5 % Suomi: 10,3 % Ruotsi: 9,3 % Kisa on tiukkaa, mutta Riikalla hyvä draivi päällä. Vasemmistolaisen päämin
      Maailman menoa
      162
      2938

    2. Miten juhlitte ensi lauantaina?

      Se on kalenteriin merkitty juhlapäiväksi, niin sitä kai kuuluu juhlia.
      Maailman menoa
      284
      2620

    3. Suomen veroaste 5 %-yks liian matala

      Palauttamalla kokonaisveroaste 1990-luvun tasolle saadaan hyvinvointivaltion palvelut rahoitettua ilman velan ottoa.
      Maailman menoa
      68
      1741

    4. Kolme neljästä suomalaisesta kannattaa miljonääriveroa

      Kertoo vasemmistoliiton teettämä kysely. Veron ulkopuolelle jätettäisiin asunto. "Puolet vastaajista oli sitä mieltä, e
      Maailman menoa
      43
      1628

    5. Kumpaan rahat, mummojen vaippoihin vai Nalle WahIroosille?

      JOS siis sinä saisit päättää?
      Maailman menoa
      38
      1520

    6. Voi mies olit taas niin komea

      Olet silmäkarkkia ❤️ Sua vois katsella vaikka koko päivän. ❤️
      Ikävä
      122
      1276

    7. Kadutko koskaan

      Sitä mun iskiyritystä?
      Ikävä
      110
      1194

    8. Ryöstö Punkaharjulla

      Punkaharjun k-market ryöstetty tänään keskellä päivää, ketä lie asialla? Poliiseja ainakin pörrää ympäriisee
      Savonlinna
      14
      1154

    9. Evoluutioon ja alkuräjähdykseen uskominen vaatii todella vahvaa uskoa

      Että tyhjästä syntyi ja kehittyi kaikki se mitä näemme ympärillämme.
      Luterilaisuus
      350
      1075

    10. Uudestisyntyminen ei tapahdu kasteessa

      Tässä Apostolien tekojen kohdassa näemme, että Filippus julisti hoviherralle ensin evankeliumia ja kuulusteli sitten tar
      Kaste
      204
      1063
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt