Форум программистов, компьютерный форум, киберфорум
C# .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
 Аватар для SKIER
12 / 11 / 5
Регистрация: 04.07.2009
Сообщений: 357

Процедура не работает

26.12.2009, 00:14. Показов 1124. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
private void comboBox1_SelectedIndexChanged(object sender, EventArgs e)
        {
            double R;
            if (double.TryParse(textBox1.Text, out R)&&comboBox1.SelectedIndex != -1)
            {
                richTextBox1.Text = elem(double.Parse(comboBox1.SelectedItem.ToString(),"Радиус: " + R.ToString() +"\n\nДиаметр: " + D.ToString() + "\n\nДлинна: " + L.ToString() + "\n\nПлощадь: " + S.ToString()));
            }
        public string elem(double komm, double R,double D,double L,double S)
        {
            switch (elem)
            {
 
                case 1:                    
                    double D = 2 * R;
                    double L = 2 * 3.14 * R;
                    double S = 3.14 * Math.Pow(R, 2);
                    richTextBox1.Text = "Радиус: " + R.ToString() + "\n\nДиаметр: " + D.ToString() + "\n\nДлинна: " + L.ToString() + "\n\nПлощадь: " + S.ToString();
                    break;
                
            }
            }
        }
    }

Подскажите в чем ошибка.Заранее благодарен
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
26.12.2009, 00:14
Ответы с готовыми решениями:

Процедура не работает
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls,...

Не работает процедура
Добрый день!! Вот код uses crt begin sound(300); end. При включение комп пищит, при вытащенной оперативы пищит, короче...

не работает процедура
блин не пойму в чем проблема... выводит 23 и все тут, процедура не работает, где я тупанул?)program z1; var x:real; procedure...

5
CEO
Эксперт С++
 Аватар для Alligieri
2258 / 1248 / 57
Регистрация: 16.03.2009
Сообщений: 3,588
26.12.2009, 01:29
тело метода внутри обработчика

Добавлено через 6 минут
вообще сам метод elem неясно что и как делает - напишите что в результате должно быть.
0
 Аватар для SKIER
12 / 11 / 5
Регистрация: 04.07.2009
Сообщений: 357
26.12.2009, 02:01  [ТС]
В результате должно
C#
1
richTextBox1.Text = "Радиус: " + R.ToString() + "\n\nДиаметр: " + D.ToString() + "\n\nДлинна: " + L.ToString() + "\n\nПлощадь: " + S.ToString();
вот етот быть!Переменные должны получить значения и выведены в Ричь бокс

Добавлено через 1 минуту
короче вот задание

Элементы окружности пронумерованы следующим образом: 1 — радиус R, 2 — диаметр D = 2·R, 3 — длина L = 2·π·R, 4 — площадь круга S = π·R2. Дан номер одного из этих элементов и его значение. Вывести значения остальных элементов данной окружности (в том же порядке). В качестве значения π использовать 3.14.


Это мне не принципиально,хочу просто разобраться как процедура работает.
0
CEO
Эксперт С++
 Аватар для Alligieri
2258 / 1248 / 57
Регистрация: 16.03.2009
Сообщений: 3,588
26.12.2009, 02:37
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
public static double[] ReturnOther(int switcher, double value)
        {
            double[] result = new double[4];
            switch (switcher)
            {
                case 1:
                    result[0] = value;
                    result[1] = 2 * value;
                    result[2] = 2 * 3.14 * value;
                    result[3] = 3.14 * value * value;
                    break;
                case 2:
                    result[0] = value/2;
                    result[1] = value;
                    result[2] = 2 * 3.14 * result[0];
                    result[3] = 3.14 * result[0]*result[0];
                    break;
                case 3:
                    result[0] = value / (2*3.14);
                    result[1] = result[0]*2;
                    result[2] = value;
                    result[3] = 3.14 * result[0] * result[0];
                    break;
                case 4:
                    result[0] = Math.Sqrt(value / 3.14);
                    result[1] = result[0]*2;
                    result[2] = 2 * 3.14 * result[0];
                    result[3] = value;
                    break;
            }
            return result;
        }
private void comboBox1_SelectedIndexChanged(object sender, EventArgs e)
{
double[] myelements = new double[4];
            myelements=ReturnOther(int.Parse(comboBox1.SelectedItem.ToString()); double.Parse(textBox1.Text));
            richTextBox1.Text =("Радиус: " + myelements[0].ToString() +"\n\nДиаметр: " + myelements[1].ToString() + "\n\nДлинна: " + myelements[2].ToString() + "\n\nПлощадь: " + myelements[3].ToString());
}
Добавлено через 1 минуту
за "вставил и заработало" не ручаюсь но править думаю немного. можно сделать и более акуратно (например результат метода выводить в структуру а не в масив), но это уже как кому больше нравится.
1
 Аватар для SKIER
12 / 11 / 5
Регистрация: 04.07.2009
Сообщений: 357
26.12.2009, 02:41  [ТС]
Alligieri
Спасибо!
Буду разбирать код
0
CEO
Эксперт С++
 Аватар для Alligieri
2258 / 1248 / 57
Регистрация: 16.03.2009
Сообщений: 3,588
26.12.2009, 02:50
поправил очепятки

C#
1
myelements=ReturnOther(int.Parse(comboBox1.SelectedItem.ToString()),double.Parse(textBox1.Text));
Добавлено через 3 минуты
сам проверил (интересно стало) - все работает только перед вызовом myelement=ReturnOther(...
надо б добавить проверку заполнения textBox1 - иначе вылетит ексепшен
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
26.12.2009, 02:50
Помогаю со студенческими работами здесь

процедура не работает
Ребят, помощь нужна. вроде всё в коде написал логично, а программа работает не правильно :( сама игра представляет собой поле, как у...

не работает процедура
подскажите почему не выводится диалог procedure TClientForm.ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket); var ...

Не работает процедура
Здраствуйте, подскажите, пожалуйста, почему процедура sp_help для таблицы Sales работает: EXEC sp_help Sales А вот для вложенной...

Процедура не работает
Добрый вечер. Процедура должна добавлять строку к уже существующему файлу. Все работает с перезаписью файла. Но с Append(f); не работает....

Не работает процедура
У меня не работает процедура procedure TForm1.Button3Click(Sender: TObject); begin Label2.Caption:='ВСЁ ВЕРНО'; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru