1-topshiriq to’g’ri burchakli uchburchakning a va


Natural N soni berilgan. Uning tub ko’paytuvchilarini ikkinchi ListBoxga joylashtiring


Download 49.33 Kb.
bet13/17
Sana21.04.2023
Hajmi49.33 Kb.
#1373416
1   ...   9   10   11   12   13   14   15   16   17
Bog'liq
dasturlash

19. Natural N soni berilgan. Uning tub ko’paytuvchilarini ikkinchi ListBoxga joylashtiring
20. Foydalanuvchining ism va familiyalari ma’lum bo’lsa, uning ismlari va familiyalari bosh
harflarini Labelda chop eting. (Ko’rsatma: ism va familiya TextBoxdan olinsin)

  1. N natural son berilgan (textBoxda). Berilgan N-yildan keying barcha raqamlari turlicha bo’lgan 10 ta yil ListBoxda chiqarilsin

int N, a;
N = Convert::ToInt64(this->textBox1->Text);
a = Convert::ToInt64(this->textBox2->Text);
for (int i = 1; i <= N; i++)
{
if (i % a == 0) {
this->listBox1->Items->Add(i);
}
}


  1. N ta son birinchi ListBoxda yozilgan. Ikkinchi ListBoxga bu sonlarni teskari tartibda Chiqaring

srand(time(NULL));
Random ^m = gcnew Random();
for (int i = 0; i < 10; i++)
{
int m;
m= (rand() % 1000)+500;
listBox1->Items->Add(m);
//listBox1->Items->Add(Convert::ToString((500,1000)));
}
}
private: System::Void button2_Click(System::Object^ sender,
System::EventArgs^ e) {
listBox1->Items->Clear();
listBox2->Items->Clear();
srand(time(NULL));
for (int i = 0; i < 10; i++)
{
int m;
m = (rand() % 1000)+500;
listBox1->Items->Add(m);
//listBox1->Items->Add(Convert::ToString((500,1000)));
}

23. ABCD to’g’ri to’rtburchakning 3 ta A(x1;y1), B(x2; y2) va C (x3; y3) uchlari koordinatalari berilgan. Uning D uchi koordinatalarini topish dasturini tuzing. (6 ta Label, 6 ta TextBox, 1 ta Button. Natija 2 ta Label chop etilsin)
24. A(x1;y1) va B(x2;y2) nuqtalar orasidagi masofani toping. Natija Labelda chop etilsin.
25. Aylanaga teng tomonli balandligi h bo’lgan uchburchak ichki chizilgan. Aylana uzunligini

Download 49.33 Kb.

Do'stlaringiz bilan baham:
1   ...   9   10   11   12   13   14   15   16   17




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling