14. tétel: Kiválogatás

Feladat: Írjon egy programot szöveges környezetben, mely véletlenszerűen generál 100 darab egész számot 1 és 50 között (a határokat is beleértve). Írja ki a képernyőre a generált számokat, majd a 10-nél nagyobb egészeket írja ki a KIMENET.TXT fájlba.
A működő programot és a kódot mutassa be tanárának!

Egy lehetséges megoldás Visual C# nyelven:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.IO;            //Ez kell a fájlműveletekhez

namespace 14tetel
{
    class Program
    {
        static void Main(string[] args)
        {
            //14. tétel: Kiválogatás
            const int utolso = 100;
            Random r1 = new Random();           //Véletlenszám objektum a rendszeridőből generálva.
            int[] szam = new int[utolso];       //Ebben tároljuk el a generált számokat
            Console.WriteLine("A generált számok: ");
            for (int i = 0; i < utolso; i++)
            {
                szam[i] = r1.Next(1, 51);
                Console.Write("{0} ", szam[i]);
            }
            Console.WriteLine("\n");
            StreamWriter kiir = new StreamWriter("KIMENET.TXT");
            //Létrehozza a fájlt a kért névvel. Ha már van ilyen, akkor fölülírja.
            for (int i = 0; i < utolso; i++)
            {
                if (szam[i]>10)
                {
                    kiir.WriteLine("{0}", szam[i]);
                }
            }
            kiir.Close();           //Ez lezárja a fájlt

            Console.WriteLine("\n\nA program futása véget ért!");
        }
    }
}