AddO1f

LabF5

Apr 3rd, 2016
170
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 1.27 KB | None | 0 0
  1. #pragma once
  2. #include <cmath>
  3. #include <stdlib.h>
  4. #define m 15
  5. int i,n,p;    
  6. int A[m];
  7.  
  8. #pragma endregion
  9. private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) {
  10.             if(textBox1->Text!="") {n=Convert::ToInt32(textBox1->Text); }
  11.             else {MessageBox::Show( "Заполните пожалуйста данные", "Ошибка ввода данных", MessageBoxButtons::OK, MessageBoxIcon::Exclamation );}      
  12.             {textBox2->Text = "";
  13.                 for (i = 0; i < n; ++i)
  14.                 {
  15.                     A[i] = rand ( ) % 121-50;  
  16.                     this->textBox2->AppendText(A[i]+"  ");
  17.                 }
  18.             }
  19. }
  20. private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e) {
  21.             int min=A[0]; int max=A[0]; int mn=0; int ch=0;
  22.             for (i = 0; i < n; ++i)
  23.             {  
  24.                 if (abs(A[i])%4==true){ch=ch+1;}  
  25.                 if (A[i]<0){mn=mn+A[i];}
  26.                 if (A[i]<min){min=A[i];}
  27.                 if (A[i]>max){max=A[i];}
  28.             }
  29.             if (checkBox1->Checked==true){this->textBox3->Text=Convert::ToString (ch);}
  30.             if (checkBox2->Checked==true){this->textBox4->Text=Convert::ToString (mn);}
  31.             if (checkBox3->Checked==true){this->textBox5->Text=Convert::ToString (min+max);}
  32. }
  33. private: System::Void button3_Click(System::Object^  sender, System::EventArgs^  e) { Application::Exit();
  34.          }
  35. };
  36. }
Advertisement
Add Comment
Please, Sign In to add comment