Két valós számról nehezen lehet eldönteni, hogy azonosak-e. Azonosnak fogadhatjuk el a két számot, ha a két szám különbségének abszolút értéke egy adott korlátnál kisebb. Írjunk programot, amely beolvas két számot és a korlátot, majd eldönti, hogy azonosak-e a beolvasott számok, ha nem, akkor a nagyobbikat írja vissza a két szám különbségének abszolút értékével.
A program az alábbi duplapontos változókat használja:
- adat1 , adat2 a két szám tárolására,
- eps korlátot tartalmazza,
- max a két szám közül a nagyobb tárolására szolgál,
- eltér a két szám különbségének abszolút értékét tartalmazza.
A duplapontos számok abszolút értékének vizsgálatára szolgál a Math.Abs függvény.
A feladat megoldása:
private void Kiértékelés_Click(object sender, EventArgs e)
{
double adat1, adat2, eps, eltér;
if (textBox1.Text != "" && textBox2.Text != "" &&
textBox3.Text != "")
{
adat1 = Double.Parse(textBox1.Text);
adat2 = Double.Parse(textBox2.Text);
eps = Double.Parse(textBox3.Text);
eltér = Math.Abs(adat1 - adat2);
if (eltér < eps)
textBox5.Text = "A két szám azonos " +
eps.ToString() +
" eltéréssel!";
else
{
if (adat1 > adat2)
textBox4.Text = adat1.ToString();
else
textBox4.Text = adat2.ToString();
textBox5.Text = eltér.ToString();
}
}
}
private void textBox1_TextChanged(object sender, EventArgs e)
{
textBox4.Text = "";
textBox5.Text = "";
}
private void textBox2_TextChanged(object sender, EventArgs e)
{
textBox4.Text = "";
textBox5.Text = "";
}
private void textBox3_TextChanged(object sender, EventArgs e)
{
textBox4.Text = "";
textBox5.Text = "";
}
private void Törlés_Click(object sender, EventArgs e)
{
textBox1.Text = ""; textBox3.Text = "";
textBox2.Text = "";
}
A program futási eredményei:
