ost = Convert :: ToDouble (textBox3-> Text);} (...) {textBox3-> Focus ( ); MessageBox :: Show ("Значення похибки введено некоректно");} true;
} LEVPR (double & buf, double & x2, int & n, double & delX, double & delY) {//метод лівих прямокутників (вважає інтриган) y, S, x1, post; postX1, postY, xx, yy; (x1 = buf; x1
{= S + funkcia (post) * ((x1 + ((x2-buf)/n))-x1);}// обчислення інтеграла {= S + funkcia (post) * (( x1 + ((x2-buf)/n))-x1);}// обчислення інтеграла
} S;
} PRAVPR (double & buf, double & x2, int & n, double & delX, double & delY) {y, S, x1, post; postX1, postY, xx , yy; (x1 = buf; x1
} S;
} SREDPR (double & buf, double & x2, int & n, double & delX, double & delY) {
double y, S, x1, post; postX1, postY, xx, yy; (x1 = buf; x1
} S;
} y;: System :: Void button1_Click (System :: Object ^ sender, System :: EventArgs ^ e) {-> Image = System :: Drawing :: Bitmap (pictureBox1-> Size.Width, -> Size.Height); :: Drawing :: Graphics ^ g = :: Drawing :: Graphics :: FromImage (pictureBox1-> Image); :: Drawing :: Pen ^ pen = System :: Drawing :: Pen (colorDialog1-> Color); :: Drawing :: Brush ^ brush = System :: Drawing :: SolidBrush (colorDialog1-> Color); x1, x2; = 1; = 1; n ;// число прямоугольніковshag,// ​​крок в циклах, тобто прирощення по осі X ;//різниця між верхньою і нижньою межами інтегрування, необхідна для знаходження кроку (radioButton1-> Checked == true) n = Convert :: ToInt64 (numericUpDown1-> Value); maxY, minY; (radioButton2- > Checked == true) n = 6; (check (x1, x2) && (x2> x1))
{double delX; ((x1 <= 0) && (x2> = 0))
{delX = (600/(abs (x1) + abs (x2)));} {delX = 600/(abs (x2-x1));}
// Зсув по осі Х: sdvigX, sdvigY; (x1 <0) = Convert :: ToInt64 (abs (x1) * delX); sdvigX = Convert :: ToInt64 (-x1 * delX) ; buf; = sdvigX +80 ;//щоб праворуч вміщувалася шкала X = x1 ;//необхідний для запам'ятовування Х1 = abs (x2-x1); = 0.001 * raznostX;
// Пошук найбільшого та найменшого Y-необхідно для масштабування = 0; = 0; srY; (x1 = x1; x1 <= (x2); x1 = x1 + shag)
Text == "Змініть") MessageBox :: Show ("Змініть межі інтегрування");
{= buf; delY;
// одиничний відрізок по осі Y (m2): ((minY <= 0) && (maxY> = 0))
{delY = (500/(abs (minY) + abs (maxY)));...
