using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Threading.Tasks; using System.Windows.Forms; using System.IO; namespace Kyrsach_14 { public partial class Form1 : Form { Label N, C, B, F; TextBox n,c,b,f,m; Button COUNT, SAVE, EXIT, COUNT_Zadat; private void Form1_Load(object sender, EventArgs e) { } public double [,] A;//public-права доступа(є ще private і protect), але даний дозволяє використовувати змінну(матрицю А) по всьому коду public double [] X; public double U; public string Aa, Xx, Uu;//для виводу на екран та збереження в файл public Form1() { InitializeComponent(); this.Text ="XX_Sasha_XX";//назва формочки this.Size = new Size(1000, 500); this.StartPosition = FormStartPosition.Manual;// екран программи размещен в верхнем левом углу this.BackColor = Color.Aqua; ///////////////////////////////////////////////////////////////////////////////////////////////////////// m = new TextBox(); m.Size = new Size(725, 350); m.Location = new Point(250,10); this.Controls.Add(m); this.m.Multiline = true; //////////////////////////////////////////////////////////////////////////////////////////////////////// N = new Label(); N.Text = "Розмірність матриці А: "; N.Size = new Size(151, 15);//(ширина, висота) N.Location = new Point(10,10);//(по Х, по У) this.Controls.Add(N); B = new Label(); B.Text = "Сума цифр дня народження: "; B.Size = new Size(151, 15); B.Location = new Point(10,30); this.Controls.Add(B); C = new Label(); C.Text = "Номер у списку групи: "; C.Size = new Size(151, 15); C.Location = new Point(10, 50); this.Controls.Add(C); F = new Label(); F.Text = "Місце збереження результатів роботи у файл"; F.Size = new Size(240,15); F.Location = new Point(10, 70); this.Controls.Add(F); //////////////////////////////////////////////////////////////////////////////////////////////////////// n = new TextBox(); n.Text = "50"; n.Size = new Size(83, 15);//(ширина, висота) n.Location = new Point(161, 10);//(по Х, по У) this.Controls.Add(n); b = new TextBox(); b.Text = "16"; b.Size = new Size(83, 15); b.Location = new Point(161, 30); this.Controls.Add(b); c = new TextBox(); c.Text = "14"; c.Size = new Size(83, 15); c.Location = new Point(161, 50); this.Controls.Add(c); f = new TextBox(); f.Text = @"D:\RESULT.txt"; f.Size = new Size(232, 15); f.Location = new Point(13, 90); this.Controls.Add(f); //////////////////////////////////////////////////////////////////////////////////////////////////////// COUNT = new Button(); COUNT.Text = "Матриця згідно завдання"; COUNT.Size = new Size(150, 30);//(ширина, висота) COUNT.Location = new Point(13, 425);//(по Х, по У) COUNT.BackColor = Color.AntiqueWhite; COUNT.Click += COUNT_Click;// Назвазмінної.Дія += Назвафункції; доречі, поки не створено нище функцію із таким ім'ям буде показзувати помилку(підкреслювати червоною хвилькою this.Controls.Add(COUNT); //Кнопка для задання матриці власноруч COUNT_Zadat = new Button(); COUNT_Zadat.Text = "Задати матрицю власноруч"; COUNT_Zadat.Size = new Size(160, 30); COUNT_Zadat.Location = new Point(170, 425); COUNT_Zadat.BackColor = Color.AntiqueWhite; COUNT_Zadat.Click += COUNT_Zadat_Click; this.Controls.Add(COUNT_Zadat); SAVE = new Button(); SAVE.Text = "Зберегти"; SAVE.Size = new Size(76, 30); SAVE.Location = new Point(900, 390); SAVE.BackColor = Color.GreenYellow; SAVE.Click += SAVE_Click; this.Controls.Add(SAVE); EXIT = new Button(); EXIT.Text = "Вийти"; EXIT.Size = new Size(76, 30); EXIT.Location = new Point(900, 425); EXIT.BackColor = Color.Red; EXIT.Click += EXIT_Click; this.Controls.Add(EXIT); } //////////////////////////////////////////////////////////////////////////////////////////////////////// void COUNT_Click(object sender, EventArgs e) { int a = Convert.ToInt32(n.Text); double mi, ma;// в коді будуть найбільшим та найменшим елементом масиву по модулю A = new double[a, a]; X = new double[a]; /////табл№1 Aa = "Матриця А:\n"; for (int i=0; iMath.Abs(ma)) { ma = A[j, i]; } if (Math.Abs(A[j,i])0) { X[i] += A[j, i]; } } } else { X[i] = mi; for (int j = 0; j < a; j++) { if (A[j, i] < 0) { X[i] += A[j, i]; } } } Xx += Convert.ToString(X[i]) + "\t"; } Xx += "\n\n\n"; MessageBox.Show(Xx); /////табл№3 if (Convert.ToInt32(c.Text)> Convert.ToInt32(b.Text)) { U = X[0] * X[1]; for(int i=1;i