|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.11.2008, 13:53 | #1 |
Пользователь
Регистрация: 26.10.2008
Сообщений: 32
|
Программа в Delphi не хочет работать. (Одномерный массив).
Добрый день.
Столкнулся я с проблемой в задаче. Условие: Разработать программу с единственным циклом для обработки одномерных массивов. При заданных Х1, Х2….Хn найти отношение A / B, где: А = Х1 + Х2 +….+ Хn B = Х1 * Х2 *….* Хn. Текст программы: Код:
Как видно на картинке я вводил в строчку N число 10, при нажатии кнопки "Использовать" вылетает ошибка. Подскажите пожалуйста где я натупил...то ли код программы совсем кривой, то ли я в форму забыл что-то добавить - никак не пойму( Спасибо. |
14.11.2008, 14:11 | #2 |
Форумчанин
Регистрация: 06.06.2007
Сообщений: 282
|
Подправил.
Код:
Не важно, как часто вы падаете. Важно, как часто вы поднимаетесь. Винс Ломбарди.
|
14.11.2008, 14:17 | #3 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Код:
|
14.11.2008, 14:22 | #4 |
Форумчанин
Регистрация: 12.09.2008
Сообщений: 239
|
странный какой-то код..... после первого For у вас нету begin'а....... а это значит што у вас в цикле только A:=0; остальное вне цикла.... со вторым циклом то же самое.... затем A и B у вас просчитывается (в идеале, если бегины добавить), но не выводится..... т.е. впринципе то что вы ввели из ячейки (которые на картинке у вас не заполнены) выводится обратно....
Блин...... малях опоздал)))) столько внимания эта тема привлекла)))
Надо бы избавиться от привычки ставить многоточие.....
Последний раз редактировалось Min; 14.11.2008 в 14:26. Причина: я опоздун)))) |
14.11.2008, 14:34 | #5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Если человек что-то делает, но не получается, грех не помочь.
|
14.11.2008, 14:59 | #6 |
Пользователь
Регистрация: 26.10.2008
Сообщений: 32
|
Большое спасибо за код!
Но все еще у меня не получается закончить этот проект(. Мне кажется, что я допускаю ошибку/забываю что-то сделать непосредственно в самой форме. Другими словами - код верный, но "приделать" к оболочке я его не могу. (Прошу прощения за такой жаргон)) Сейчас я подробно распишу свои действия с формой: Создаю новый проект, размещаю на форме Edit1, Button1, StringGrid1. Больше ничего не создаю в ней. Далее выделяю кнопку Button1, иду в Events и ставлю OnClick - Button1Click. Потом копирую код puporev'a. Все. Больше ничего не делаю. Нажимаю F9, ввожу в текстовое поле число, жму кнопку Buton1 - и снова ошибка. Как мне кажется я чего-то не сделал со StringGrid1, а что там нужно сделать - я не знаю. Подскажите, пожалуйста, как код прикрутить к оболочке. |
14.11.2008, 15:01 | #7 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Цитата:
|
|
14.11.2008, 15:08 | #8 |
Пользователь
Регистрация: 26.10.2008
Сообщений: 32
|
|
14.11.2008, 16:05 | #9 |
Форумчанин
Регистрация: 06.06.2007
Сообщений: 282
|
Kawun, держи. Только учти, что у меня Delphi 2009.
Не важно, как часто вы падаете. Важно, как часто вы поднимаетесь. Винс Ломбарди.
Последний раз редактировалось VVM; 14.11.2008 в 16:08. |
14.11.2008, 16:26 | #10 |
Пользователь
Регистрация: 26.10.2008
Сообщений: 32
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
одномерный массив в delphi | d3[Z.oRg] | Помощь студентам | 7 | 18.06.2011 15:04 |
Одномерный массив в Delphi (Задача) | Kawun | Помощь студентам | 10 | 18.06.2011 14:21 |
одномерный массив | ldx | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 06.06.2008 17:45 |
поиск ни как не хочет работать | Gooch | БД в Delphi | 6 | 05.04.2008 20:53 |
одномерный массив | fatdog | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 4 | 23.02.2008 10:05 |