Важная информация
Показано с 1 по 2 из 2

Тема: C# и Delphi

  1. #1 C# и Delphi 
    Новичок
    Регистрация
    22.04.2019
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Доброго времени суток! Перевожу из языка Делфи в c#, почти получилось, но есть недочеты. Если кто-то отзовется помочь устранить эти недочеты, буду очень благодарна!

    КОД ДЕЛФИ:

    ы.png


    КОД C# ( у меня ФУНКЦИЯ ДРУГАЯ, это так и должно быть) :

    private void button1_Click_1(object sender, EventArgs e)
    {
    double s1, s2, h, x,n;
    double a = Convert.ToDouble(textBox1.Text), b = Convert.ToDouble(textBox2.Text);
    double eps = Convert.ToDouble(textBox3.Text);
    f: Array[1,1000];

    {
    s1 = 0; s2 = 0;
    n = 4;
    h = (b - a) / n;
    x = a + h-h / 2;
    for (int i = 0; i < n; i++)

    {
    f[i] = Math.Cos(Math.Exp((x / 3) + 0.2 * x);
    x = x + h;
    }
    m1: n = n * 2;
    h = (b - a) / n;
    x = a + h - h / 2;
    for (int j = 0; j<n; j++)
    {
    F[j] = Math.Cos(Math.Exp((x / 3) + 0.2 * x));
    s2=s2+(h*Math.Abs(f[j]));
    x = x + h;
    }
    if (Math.Abs(s1 - s2) < eps)
    label4.Text = "Значение интеграла: " + (s2);
    else s1 = s2; s2 = 0;
    goto m1;

    }
    }

    p.s. впервые пишу на c#, тапками не бросайтесь.
    Ответить с цитированием  
     

  2. #2  
    Профи
    Регистрация
    09.11.2013
    Сообщений
    229
    Сказал(а) спасибо
    17
    Поблагодарили 75 раз(а) в 50 сообщениях
    Цитата Сообщение от Лина Лика Посмотреть сообщение
    f: Array[1,1000];
    Цитата Сообщение от Лина Лика Посмотреть сообщение
    goto m1;
    тут все - сплошной недочет. не нужно мешать мух и котлет. есть задача - создавай метод. а ты смешала гуй с математикой. так нельзя. за такое бьют по рукам.
    пользуйся гуглом, а не чужим невежеством
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. блок-схемы в delphi
    от Евгения Павлова в разделе Delphi
    Ответов: 0
    Последнее сообщение: 11.04.2018, 23:04
  2. Новый канал по Delphi
    от Yuriy Biza в разделе Delphi
    Ответов: 38
    Последнее сообщение: 31.01.2017, 14:33
  3. Помогите Delphi
    от Артём Седляр в разделе Delphi
    Ответов: 9
    Последнее сообщение: 23.08.2016, 19:36
  4. Программист Delphi (г.Спб)
    от HRr в разделе Архив
    Ответов: 0
    Последнее сообщение: 13.02.2014, 20:16
  5. Delphi 5: Downgrade или нет?
    от Kakos_nonos в разделе Delphi
    Ответов: 11
    Последнее сообщение: 27.08.2012, 21:41
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •