Válogatás

2020. július 02. - Benkő Tiborné

Írjunk programot, amely egy adott számsorozatból kiválogatja a páros és páratlan számokat, megszámlálja és kiszámítja az összegüket. Valamint megkeresi a 3-mal oszthatókat is. Az adatokat véletlenszám-generátorral állítjuk elő, ahol megadjuk az adatok számát és a generált érték maximumát.

A feladat megoldása

int db, adat;
private void Generálás_Click(object sender, EventArgs e)
{
int max;
Random m = new Random();
listBox1.Items.Clear();
if (textBox1.Text != "" && textBox2.Text != "")
{
db = Int32.Parse(textBox1.Text);
max = Int32.Parse(textBox2.Text);
for (int i = 0; i < db; i++)
{
adat = m.Next(max) + 1;
listBox1.Items.Add(adat);
}
Generálás.Enabled = false;
}
}

private void Válogatás_Click(object sender, EventArgs e)
{
int i, pt_db, p_db, oszt3_db;
int páros_össz, pt_össz, összes_adat;
pt_db = 0; p_db = 0; oszt3_db = 0;
páros_össz = 0; pt_össz = 0; összes_adat = 0;
for (i = 0; i < db; i++)
{
adat = (int)listBox1.Items[i];
összes_adat += adat;
if (adat % 2 == 0)
{
listBox2.Items.Add(adat);
páros_össz += adat;
p_db++;
}
else
{
listBox3.Items.Add(adat);
pt_össz += adat;
pt_db++;
}
if (adat % 3 == 0)
{
oszt3_db++;
}
textBox3.Text = összes_adat.ToString();
textBox4.Text = páros_össz.ToString();
textBox5.Text = pt_össz.ToString();
textBox6.Text = p_db.ToString();
textBox7.Text = pt_db.ToString();
textBox8.Text = oszt3_db.ToString();
}
}

private void textBox1_TextChanged(object sender, EventArgs e)
{
textBox3.Text = ""; textBox4.Text = "";
textBox5.Text = ""; textBox6.Text = "";
textBox7.Text = ""; textBox8.Text = "";
listBox1.Items.Clear();
listBox2.Items.Clear();
listBox3.Items.Clear();
}

private void textBox2_TextChanged(object sender, EventArgs e)
{
textBox3.Text = ""; textBox4.Text = "";
textBox5.Text = ""; textBox6.Text = "";
textBox7.Text = ""; textBox8.Text = "";
listBox1.Items.Clear();
listBox2.Items.Clear();
listBox3.Items.Clear();
}

private void Törlés_Click(object sender, EventArgs e)
{
textBox3.Text = ""; textBox4.Text = "";
textBox5.Text = ""; textBox6.Text = "";
textBox7.Text = ""; textBox8.Text = "";
listBox1.Items.Clear();
listBox2.Items.Clear();
listBox3.Items.Clear();
Generálás.Enabled = true;
}