Практична робота № 6. Введення й виведення даних, робота зі змінними.
- Відкрийте середовище Delphi 7 і створіть новий проект.
- Установіть для форми колір фону жовтий, розміри 50 на 150 пікселів, текст заголовка Практична №6.
- Розмістіть на формі дві кнопки, три поля.
- Задайте на першій кнопці текст Переміщення, на другій – Обчислення, у полів і написів – порожній текст.
- Розмістіть на формі біля кожного поля додаткові написи з текстами, що будуть пояснювати їхні призначення.
- Складіть обробник події OnClick першої кнопки, виконання якого приведе до переміщення форми на 50 пікселів управо та на 30 пікселів униз, кожного текстового поля – на 20 пікселів уліво та на 30 пікселів уверх і зробить їхній фон різнокольоровим (на власний смак).
- Запустіть проект та переконайтеся у правильності результатів.
- Складіть обробник події OnClick другої кнопки, виконання якого приведе до:
- знаходження об’єму та площі повної поверхні прямокутного паралелепіпеда, вважаючи, що у поля будуть уведені довжини його ребер.
- Знаходження площі трикутника за трьома сторонами.
- Обчислення середнє арифметичне трьох чисел.
- Знаходження катета трикутника за заданим значенням гіпотенузи та іншого катета.
- Додайте до другого обробника події команду виведення повідомлення про об’єм паралелепіпеда у вікно повідомлень.
- Запустіть проект і переконайтеся у правильності результатів.
- Створіть у власній папці папку Практична 6 і збережіть у ній проект.
Додаткове завдання (12 балів):
Переробіть програму так, щоб для будь-якого трицифрового числа, введеного у текстове поле, виводилася сума його цифр у окремому вікні.
Джерело: http://zastupniku.at.ua/infirmatik/pr_program/praktichna-6.rar |