Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
| bestscooter |
Сообщение
#1
|
|
Новичок ![]() Группа: Пользователи Сообщений: 14 Пол: Мужской Репутация: 0 |
вот мне надо сделать программу "Решето Эратосфена" в инете нашел ее.. но она сделана как модуль.... ума не хватает переделать ее в программму....
Прикрепленные файлы
erat.pas ( 1.39 килобайт )
Кол-во скачиваний: 377 |
![]() ![]() |
| GoodWind |
Сообщение
#2
|
![]() Автооответчик ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
Тогда объяви глобальную переменную типа TInteger1DArray
Кинь на форму Button и Edit. В обработчике события Onclick кнопки напиши: Код EratosthenesSieve(strtoint(edit1.text, a); {a - переменная типа "EratosthenesSieve"} ну а как выводить результат думай уже сам.... например в memo.... -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
bestscooter помогите переделать модуль в программу 10.12.2005 21:43
klem4 вытаскиваешь от туда процедуру и пихаешь в свою пр… 10.12.2005 21:59
bestscooter
вытаскиваешь от туда процедуру и пихаешь в свою п… 11.12.2005 19:29
#$# PaVeL #$# Берешь выделяешь процедуру, нажимаешь копировать, … 12.12.2005 16:18
GoodWind
я тож так понял и так бы ответил P:]
просто скоп… 12.12.2005 16:35
bestscooter
я тож так понял и так бы ответил P:]
просто скоп… 12.12.2005 20:55![]() ![]() |
|
Текстовая версия | 20.02.2026 0:16 |