Решение интеграла методом средних прямоугольников в WindowsForm с графиком

@вишневкина · Регистрация: 02.04.2018

Студворк — интернет-сервис помощи студентам

Здравствуйте!
Возникла проблема с графиком.При вводе большого интервала разбиения,с графиком(на котором рисуются прямоугольники)происходит непонятная вещь.
Еще хотелось бы,чтобы рисовались нормальные прямоугольники,долго мучилась,но максимум,чего добилась можно увидеть ниже.

Вот код

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
 
namespace my_kursach
{
    public partial class Form1 : Form
    {
 
        static double f(double x)
        {
            return 1 / (x * x + 1);
        }
        static double f2(double x)
        {
            return (x*x/(8+x*x*x));
        }
        static double f3(double x)
        {
            return Math.Cos(x);
                
        }
        
  
        public Form1()
        {
            InitializeComponent();
        }
 
        private void button1_Click(object sender, EventArgs e)
        {
            double a, b, n,c ;
            a = Convert.ToDouble(textBox1.Text);
            b = Convert.ToDouble(textBox2.Text);         
            n = Convert.ToDouble(textBox3.Text);
            const int eps = 5;
 
            
            if (a > b)
            {
 
                c = a;
 
                a = b;
 
                b = c;
            }
            // Настраиваем оси графика
            chart1.ChartAreas[0].AxisX.Minimum = a;
            chart1.ChartAreas[0].AxisX.Maximum = b;
            //chart1.ChartAreas[1].AxisX.MajorGrid.Interval = h;
            chart1.ChartAreas[0].AxisX.MajorGrid.Enabled = false;
            chart1.ChartAreas[0].AxisY.MajorGrid.Enabled = false;
            chart1.ChartAreas[0].AxisX.Crossing = 0;
            chart1.ChartAreas[0].AxisY.Crossing = 0;
            chart1.Series[0].Points.Clear();
            chart1.Series[1].Points.Clear();
 
        if (radioButton1.Checked == true)
                {
                    double s = 0, i;
                    double RndS=Math.Round(s,eps);
                    double h = (b - a) / n;
 
 
                    for (i =0; i < n; i++)
                    {
 
                        s += f(a + h * (i + 0.5));
                        chart1.Series[0].Points.AddXY(h * (i + 0.5), f(i));
                        chart1.Series[1].Points.AddXY(i, f(i));
                    }
 
                   s *= h;
                   RndS = Math.Round(s, eps);                    
                    textBox4.Text = RndS.ToString();
                    chart1.Series[0].Points.AddXY(h * (i + 0.5), f(i));
                    chart1.Series[1].Points.AddXY(i, f(i));
                                       
                }
        if (radioButton2.Checked == true)
        {
 
            double s = 0, i;
            double RndS = Math.Round(s, eps);
            double h = (b - a) / n;
 
 
            for (i = 0; i < n; i++)
            {
 
                s += f(a + h * (i + 0.5));
                chart1.Series[0].Points.AddXY(h * (i + 0.5), f2(i));
                chart1.Series[1].Points.AddXY(i, f2(i));
            }
 
            s *= h;
            RndS = Math.Round(s, eps);
            textBox4.Text = RndS.ToString();
            chart1.Series[0].Points.AddXY(h * (i + 0.5), f2(i));
            chart1.Series[1].Points.AddXY(i, f2(i));
            
        }
        if (radioButton3.Checked == true)
        {
            double s = 0, i;
            double RndS = Math.Round(s, eps);
            double h = (b - a) / n;
 
 
            for (i = 0; i < n; i++)
            {
 
                s += f(a + h * (i + 0.5));
                chart1.Series[0].Points.AddXY(h * (i + 0.5), f3(i));
                chart1.Series[1].Points.AddXY(i, f3(i));
            }
 
            s *= h;
            RndS = Math.Round(s, eps);
            textBox4.Text = RndS.ToString();
            chart1.Series[0].Points.AddXY(h * (i + 0.5), f3(i));
            chart1.Series[1].Points.AddXY(i, f3(i));
            
        }
        }
       
    }
}

@zna926 · 14.05.2019, 12:11

Для вычисления интеграла указанным методом никакие прямоугольники не рисуются. Нужно учесть, что для этого нужно
отрезок интегрирования(по Х) разбить, по крайней мере, на десятки тысяч значений, а еще лучше и на миллионы.
Все это решается в коде. А рисовать уже по вычисленным значениям

Новые блоги и статьи Все статьи Все блоги /
Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .	PowerShell Snippets iNNOKENTIY21 11.11.2025 Модуль PowerShell 5. 1+ : Snippets. psm1 У меня модуль расположен в пользовательской папке модулей, по умолчанию: \Documents\WindowsPowerShell\Modules\Snippets\ А в самом низу файла-профиля. . .	PowerShell и онлайн сервисы. Валюта (floatrates.com руб.) iNNOKENTIY21 11.11.2025 PowerShell функция floatrates-rub Примеры вызова: # Указанная валюта 'EUR' floatrates-rub -Code 'EUR' # Список имеющихся кодов валют floatrates-rub -Available function floatrates-rub {
PowerShell и онлайн сервисы. Погода (RP5.ru) iNNOKENTIY21 11.11.2025 PowerShell функция Get-WeatherRP5rss для получения погоды с сервиса RP5 Примеры вызова Get-WeatherRP5rss с указанием id 5484 — Москва (восток, Измайлово) и переносом строки:. . .	PowerShell и онлайн сервисы. Погода (wttr) iNNOKENTIY21 11.11.2025 PowerShell Функция для получения погоды с сервиса wttr Примеры вызова: Погода в городе Омск с прогнозом на день, можно изменить прогноз на более дней, для этого надо поменять запрос:. . .	PowerShell и онлайн сервисы. Валюта (ЦБР) iNNOKENTIY21 11.11.2025 # Получение курса валют function cbr (] $Valutes = @('USD', 'EUR', 'CNY')) { $url = 'https:/ / www. cbr-xml-daily. ru/ daily_json. js' $data = Invoke-RestMethod -Uri $url $esc = 27 . . .	И решил я переделать этот ноут в машину для распределенных вычислений Programma_Boinc 09.11.2025 И решил я переделать этот ноут в машину для распределенных вычислений Всем привет. А вот мой компьютер, переделанный из ноутбука. Был у меня ноут асус 2011 года. Со временем корпус превратился. . .	Мысли в слух kumehtar 07.11.2025 Заметил среди людей, что по-настоящему верная дружба бывает между теми, с кем нечего делить.

@zna926 548 / 479 / 315 Регистрация: 24.09.2013 Сообщений: 3,345 Записей в блоге: 1
	14.05.2019, 12:11
	Для вычисления интеграла указанным методом никакие прямоугольники не рисуются. Нужно учесть, что для этого нужно отрезок интегрирования(по Х) разбить, по крайней мере, на десятки тысяч значений, а еще лучше и на миллионы. Все это решается в коде. А рисовать уже по вычисленным значениям 0

Опции темы