Задание к сессии

IIaJIbI4 · 28.11.2009, 13:35

Люди добрые помогите пожалуйста студенту...

Вариант 13 -Ларшин Юрий

Выполнить задания в среде Delphi поместив некоторые свои функции и процедуры по каждому заданию в отдельный модуль, а затем
использовать процедуры и функции модуля в своем проекте. Выбор выполняемого задания должен осуществляться через главное меню.
Меню содержит пункты и подпункты: Задания (задание1, ...,задание 5); помощь(автор, о программе); выход. При запуске программы
экран отображает меню и надпись на форме, содержащую информацию об авторе и названии проекта. Задания открываються в том же окне
подпункты Автор и О программе в отдельных окнах, содержащих только кнопку ОК.

И если можно то не фрагментами а полностью. Заранее благодарю...

Задание 1. Составьте программу, которая создает файл 'RANDOM2.DAT', состоящий из 100 случайных цифр типа integer в диапозоне 0...300.
Исследуйте получившийся файл с целью обнаружения в нем простых чисел 23,31,37,41,53,107,127,151,197. В конце программы уничтожьте
созданный файл.
Задание 2. Дан одномерный массив целых чисел. Проверьте, являеться ли он упорядоченным по убыванию.
Задание 3. Вычеркните из заданного слова все буквы, совпадающие с его последней буквой.
Задание 4. В матрице n-го порядка переставить строки так, чтобы на главной диагонали матрицы были расположены элементы, наименьшие
по абсолютной величине.
Задание 5. Вывести график функции. Для построения графика используется вся доступная область формы, причем если во время работы
программы пользователь изменит размер окна, то график должен быть перерисован заново с учетом размеров окна. y=в числителе e в степени sin в кубе x в знаменателе 1+a*e в степени натуральный логорифм 4.2-x по модулю. P.S. Sory за такое написание формулы...

MrSTEP · 28.11.2009, 14:26

Цитата:

Сообщение от IIaJIbI4

....
Задания открываються в том же окне
...

в одном окне (форме) 5 заданий? это обязательно?
и еще. когда сдавать нужно?

MrSTEP · 28.11.2009, 16:19

программисты, у меня к вам следующая просьба. Поскольку я сам учусь, мне будет полезно сделать подобное задание. в случае, если у автора есть в запасе хотя бы неделя, прошу предоставить мне возможность сделать это задание самому, но с вашей консультацией. единственное, что я не знаю - задание с графиком. напишите эту программу, и выложите его сюда, пожалуйста, а уж я разгребу. Спасибо за внимание.

Long Cat · 28.11.2009, 16:42

Цитата:

- задание с графиком. напишите эту программу, и выложите его сюда, пожалуйста, а уж я разгребу

Экземпляр рисующего объекта называется canvas.
Следует обратить внимание на методы

Код:

form1.canvas.moveto()

и

Код:

form1.canvas.lineto()

MrSTEP · 28.11.2009, 17:22

так, думаю что moveto перемещает курсор в точку на графике, а lineto - проводи туда же линию?

Long Cat · 28.11.2009, 17:22

Именно так.

MrSTEP · 28.11.2009, 17:26

понятно, будем пробовать. а какая процедура удаляет файл в Object Pascal?

Long Cat · 28.11.2009, 17:31

Код:

DeleteFile()

Эта функция из WINAPI, она не имеет отношения к конкретному языку программирования.

MrSTEP · 28.11.2009, 17:48

WINAPI.. а просто так ее получится употребить в проекте?

Long Cat · 28.11.2009, 17:49

Программа ведь для Windows? Тогда можно.

28.11.2009, 13:35	#1 (permalink)
IIaJIbI4 Новичок Регистрация: 24.11.2009 Сообщений: 2 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Задание к сессии Люди добрые помогите пожалуйста студенту... Вариант 13 -Ларшин Юрий Выполнить задания в среде Delphi поместив некоторые свои функции и процедуры по каждому заданию в отдельный модуль, а затем использовать процедуры и функции модуля в своем проекте. Выбор выполняемого задания должен осуществляться через главное меню. Меню содержит пункты и подпункты: Задания (задание1, ...,задание 5); помощь(автор, о программе); выход. При запуске программы экран отображает меню и надпись на форме, содержащую информацию об авторе и названии проекта. Задания открываються в том же окне подпункты Автор и О программе в отдельных окнах, содержащих только кнопку ОК. И если можно то не фрагментами а полностью. Заранее благодарю... Задание 1. Составьте программу, которая создает файл 'RANDOM2.DAT', состоящий из 100 случайных цифр типа integer в диапозоне 0...300. Исследуйте получившийся файл с целью обнаружения в нем простых чисел 23,31,37,41,53,107,127,151,197. В конце программы уничтожьте созданный файл. Задание 2. Дан одномерный массив целых чисел. Проверьте, являеться ли он упорядоченным по убыванию. Задание 3. Вычеркните из заданного слова все буквы, совпадающие с его последней буквой. Задание 4. В матрице n-го порядка переставить строки так, чтобы на главной диагонали матрицы были расположены элементы, наименьшие по абсолютной величине. Задание 5. Вывести график функции. Для построения графика используется вся доступная область формы, причем если во время работы программы пользователь изменит размер окна, то график должен быть перерисован заново с учетом размеров окна. y=в числителе e в степени sin в кубе x в знаменателе 1+a*e в степени натуральный логорифм 4.2-x по модулю. P.S. Sory за такое написание формулы...

28.11.2009, 17:31	#8 (permalink)
Long Cat Banned Регистрация: 01.09.2009 Сообщений: 4,396 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 2544	Код: DeleteFile() Эта функция из WINAPI, она не имеет отношения к конкретному языку программирования.

28.11.2009, 13:35
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Данные которые содержаться по этим ссылкам помогут вам разобраться Задание в Pascal. Подскажите Задание в паскале. Помогите с решением Задание в паскале с кординатами Задание в Паскале

28.11.2009, 16:19	#3 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	программисты, у меня к вам следующая просьба. Поскольку я сам учусь, мне будет полезно сделать подобное задание. в случае, если у автора есть в запасе хотя бы неделя, прошу предоставить мне возможность сделать это задание самому, но с вашей консультацией. единственное, что я не знаю - задание с графиком. напишите эту программу, и выложите его сюда, пожалуйста, а уж я разгребу. Спасибо за внимание.

28.11.2009, 17:22	#5 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	так, думаю что moveto перемещает курсор в точку на графике, а lineto - проводи туда же линию?

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

28.11.2009, 17:22	#6 (permalink)
Long Cat Banned Регистрация: 01.09.2009 Сообщений: 4,396 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 2544	Именно так.

28.11.2009, 17:26	#7 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	понятно, будем пробовать. а какая процедура удаляет файл в Object Pascal?

28.11.2009, 17:48	#9 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	WINAPI.. а просто так ее получится употребить в проекте?

28.11.2009, 17:49	#10 (permalink)
Long Cat Banned Регистрация: 01.09.2009 Сообщений: 4,396 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 2544	Программа ведь для Windows? Тогда можно.