Здравствуйте! Помогите пожалуйста с Delphi.
Составте приложение в среде Delphi (Lazarus), рассчитывающую функцию y(x) в зависимости от введенного параметра А. Функция и значения А выбираются из таблицы 1 в соответствии с N.
Программа должна содержать:
1. Оператор выбора Case..of
2. Четыре вида оператора цикла
3. Поясняющие комментарии к тексту программы
4. Поясняющие надписи к визуальным компонентам, расположенным на форме
5. Форму с компонентами соответствующими варианту
6. Верхнее меню
7. Контекстное меню
8. Диалоговые окна
В программе предусмотреть:
1. Запрос на подтверждение пользователем выхода из программы.
2. Значение параметра А выбирается из таблицы 2 в соответствии с номером варианта.
3. Получение значения y(x)записываются в массив.
4. Значение массиву y(x) и x выводится в компонент соответствующий варианту.
5. Верхнее меню (компонент MainMenu ) содержит: выход из программы, расчет y(x) и выбор критерия для расчета. Для всех вариантов сделать следующие критерии:
• Максимальный элемент массива,
• Минимальный элемент массива,
• Сумма всех элементов массива,
• Произведение всех элементов массива,
• Сумма всех отрицательных элементов массива,
• Произведение всех отрицательных элементов массива,
• Сумма всех положительных элементов массива,
• Произведение всех положительных элементов массива,
Вывод рассчитанных критериев осуществляется с помощью диалогового окна (Application.MessageBox).
• Вывод всех положительных элементов массива
• Вывод всех отрицательных элементов массива
Вывод всех положительных и отрицательных элементов массива осуществляется в компонент в соответствии с вариантом задания (таблица №3).
Если положительные или отрицательные элементы при расчете соответствующего критерия отсутствуют предусмотреть вывод сообщения об их отсутствии.
6. Невозможность расчета у(х) при не введенном А
7. Невозможность расчета критериев без рассчитанной у(х)
8. Все функции верхнего меню дублируются в контекстном меню(PopupMenu).
Таблица №1
Вариант 0
xϵ[-3,3] шаг 0,5
Таблица №2
Вариант 0
Ввод – Edit
вывод – ListBox
Таблица№3
Вариант 0
Вывод - Memo