Создать приложение в delphi которое будет вычислять корни квадратного уравнения (6 видео)

Решение квадратного уравнения на Делфи

Решение квадратного уравнения на делфи или лазарусе. Поля edit1, edit2, edit3 для ввода коэффициентов. edit4 для вывода решения. При открытии формы коэффициент по умолчанию становятся равными единицы.

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls;

TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private

public

end;

var
Form1: TForm1;

procedure TForm1.Button1Click(Sender: TObject);
Var a,b,c,d,x1,x2:real;
begin
a:=strtofloat(edit1.text);
b:=strtofloat(edit2.text);
c:=strtofloat(edit3.text);
d:=((b*b)-(4*a*c));
if d Автор admin Опубликовано 04.06.2016

Содержание

Разработка приложения в среде Delphi «Решение квадратных уравнений»
Просмотр содержимого документа «Лабораторная работа на откр. урок»
Просмотр содержимого документа «Лабораторная работа №6»
Просмотр содержимого документа «на откр урок»
Создать приложение в delphi которое будет вычислять корни квадратного уравнения
3. Создание простого проекта
3.1. Форма приложения
3.2. Компоненты формы
📸 Видео

Видео:Программа, определяющая корни квадратного уравнения. Язык программирования Python.Скачать

Разработка приложения в среде Delphi «Решение квадратных уравнений»

Цель урока: 1. Рассмотреть решение квадратных уравнений в среде Delphi;

2. Развитие познавательных навыков и интереса к предмету

3. Воспитание ответственного отношения к предмету

Просмотр содержимого документа
«Лабораторная работа на откр. урок»

Лабораторная работа №5

Разработка приложения в среде Delphi «Решение квадратных уравнений».

1.Создайте проект . Для этого добавьте на форму следующие компоненты: Label 1, … Label 6; Button 1, Edit 1… Edit 3.

2.Задайте объектам следующие свойства.

Решение квадратных уравнений

MS Sans Serif , полужирный курсив, размер 14, цвет красный

Label 2, … Label6

MS Sans Serif , полужирный курсив, размер 14, цвет синий

MS Sans Serif , полужирный курсив, размер 14, цвет чёрный

Результат выполнения программы

procedure TForm1.Button1Click(Sender: TObject);

Просмотр содержимого документа
«Лабораторная работа №6»

Лабораторная работа №6

Создание Windows-приложения для вычисления различных математических функций

Ввести значение x и вычислить значения следующих математических функций:

Cos(x) Ln(x) Sqr(x) Sqrt(x) Sin(x) Log10(x) Exp(x)

Поместить компоненты Label и Edit в окно формы Form1 и установить их свойства.

Записать код для обработки события OnClick на объекте Button1:

procedure TForm1.Button1Click(Sender: TObject);

Var x, y1, y2 : real;

Просмотр содержимого документа
«на откр урок»

Средняя школа №3 им. Т. Шаханова

Разработка приложения в среде Delphi «Решение квадратных уравнений»

Учитель: Уразбаева Э.К.

Тема: Разработка приложения в среде Delphi «Решение квадратных уравнений».

Тип урока: изучение нового материала

Цель урока: 1. Рассмотреть решение квадратных уравнений в среде Delphi ;

2. Развитие познавательных навыков и интереса к предмету

3. Воспитание ответственного отношения к предмету

Сообщаю цель и ход урока.

Все мы знаем, что информатика напрямую связана с математикой. Сегодня на уроке мы ещё раз убедимся в этом. Уже несколько уроков подряд мы с вами работаем в среде программирования Delphi , разрабатываем различные небольшие программки, такие как «Светофор», «Увеличение, уменьшение текста», «Разработка тестов». На этом уроке мы с вами рассмотрим, как можно решать квадратные уравнения быстро и легко. Мы напишем программу в среде Delphi , введём любое квадратное уравнение и получим сразу ответ.

Итак, наша тема «Разработка приложения в среде Delphi «Решение квадратных уравнений».

Объяснение нового материала.

С какой версией Delphi мы с вами работаем?

Какую используем вкладку?

Как сохранить готовый проект?

При различных вариантах ответов, какую кнопку мы используем?

Какие ещё кнопки вы знаете?

А теперь вспомним математику.

Какой вид имеет квадратное уравнение? ( ax 2 + bx + c =0)

Значит, какие значения нам необходимы? (а, b , с)

Что ещё необходимо найти при решении квадратного уравнения? (дискриминант)

Как находиться дискриминант? ( D = b 2 -4 ac )

Раздаю лабораторные работы.

1.Создайте проект . Для этого добавьте на форму следующие компоненты: Label 1, … Label 6; Button 1, Edit 1… Edit 3.

Видео:34 Задача: Найти корни квадратного уравнения при помощи PythonСкачать

Создать приложение в delphi которое будет вычислять корни квадратного уравнения

Рис. 2. Главное окно Delphi

Окно формы (его заголовок Form 1) представляет собой заготовку — макет одного из окон разрабатываемого приложения.

Окно Инспектора объектов (его заголовок Object Inspector ) позволяет видеть и менять характеристики (свойства) объектов проекта. После запуска Delphi в этом окне находятся свойства формы Form 1.

Видео:MIT App Inventor. Создание приложения для нахождения корней квадратного уравненияСкачать

3. Создание простого проекта

Демонстрацию возможностей Delphi и технологии визуального проектирования рассмотрим на примере разработки программы решения квадратного уравнения.

Работа над новым проектом — так в Delphi называется разрабатываемое приложение, начинается с создания стартовой формы — окна, которое появляется при запуске приложения.

3.1. Форма приложения

Стартовая форма создается путем изменения свойств (характеристик) формы Forml . Свойства формы определяют ее внешний вид: размер, положение на экране, текст заголовка, вид рамки. Они перечислены на вкладке (странице) Properties (Свойства) окна Object Inspector . В левой колонке перечислены имена свойств, в правой — их значения.

Сначала надо изменить значение свойства Caption (Заголовок) — заменить текст «Forml» на текст «Решение квадратного уравнения». Для этого нужно щелкнуть на поле Caption . В результате этого в правой колонке, где находится текущее значение свойства — текст «Forml», появляется курсор (рис.3 ).

Рис. 3. Установка свойства путем ввода значения

Используя клавишу Backspace >, надо удалить текст «Forml» и ввести текст «Решение квадратного уравнения».

Аналогичным образом можно установить значения свойств Height (Высота) и Width (Ширина), которые определяют высоту и ширину формы. Размер формы, а также ее положение на экране задается в пикселях.

При выборе некоторых свойств, например Color (Цвет), которое определяет цвет фона формы, после значения свойства выводится кнопка раскрывающегося списка. В результате щелчка на ней появляется список доступных значений свойства, из которого можно выбрать нужное значение (рис. 4).

Помимо обычных свойств у объектов, в том числе и у формы, могут быть вложенные свойства. Перед именем вложенного свойства стоит значок «плюс». При двойном щелчке на имени вложенного свойства раскрывается список уточняющих свойств (рис. 5), а значок «плюс» меняется на «минус».

Рис. 4. Установка свойств путем выбора значений из списка

Рис. 5. Пример раскрытого списка, уточняющих свойств свойства Font

Создать приложение в delphi которое будет вычислять корни квадратного уравнения

В поле значения свойства Font (Шрифт) после значения расположена кнопка с тремя точками, при нажатии которой появляется стандартное диалоговое окно Windows выбора шрифта и его характеристик.

Большинство свойств определяют внешний вид формы. Свойство Name (Имя) определяет имя формы, оно используется в программе для управления формой.

Ниже в таблице приведены измененные свойства формы разрабатываемого приложения. Остальные свойства формы оставлены без изменения и в таблице не приведены.

Решение квадратного уравнения

Таблица содержит значения вложенных свойств свойства Font (Шрифт): Name (Имя) и Size (Размер). Перед именем вложенного свойства указывается имя вмещающего его свойства с точкой ( Font ).

3.2. Компоненты формы

Программа решения квадратного уравнения должна получить от пользователя исходные данные — значения коэффициентов уравнения. В Windows данные вводятся в поля редактирования с клавиатуры. Поэтому в нашу форму надо добавить три компонента — три поля редактирования.

В Delphi поля редактирования, командные кнопки, поля статического текста и прочие элементы управления, находящиеся в форме, называются компонентами (компоненты формы). В программе форма и компоненты рассматриваются как объекты. Этим можно объяснить то, что окно, в котором находятся свойства компонентов, называется Object Inspector (Инспектор объектов).

Для создания проекта используется следующий минимальный набор компонент.

Button — стандартная кнопка, обычно кнопка используется для запуска действия, при этом задействуют только метод OnEvent (реакция на нажатие). Свойство Default = True ассоциирует вводимый компонент с кнопкой Enter, Cancel = True — с кнопкой Esc. Свойства Color для оформления надписи (Caption) у кнопки нет. Амперсант, помещенный в тексте надписи, указывает быструю Alt — клавишу запуска, например, Caption = A & Ppend вызывает срабатывание кнопки при нажатии Alt-P. Свойство ModalResult = true определит обязательность щелчка мышью кнопки для закрытия дочернего окна.

Label — метка, используется как надпись или как область вывода информации для чтения. Как и для кнопки, для метки можно определить клавишу быстрого доступа, но она будет запускать связанный с меткой компонент (по FocusControl). Свойство AutoSize=True определит минимизацию размера метки под текст надписи, Aligment — центровку этого текста, WordWrap — возможность расположения текста в несколько строк, Transparent — прозрачность при наложении на другие элементы.

Edit — строка ввода. Заголовка (Caption) у этого компонента нет, но есть свойство Text как содержимое строки. Это свойство можно как считывать, так и присваивать (при необходимости с ограничением длины назначением свойства MaxLength). При вводе конфиденциальной информации указывают отображаемые символы (обычно «*»).

Чтобы добавить к форме компонент, надо на палитре компонентов щелкнуть на кнопке с нужной пиктограммой, затем — в той точке формы, где должен находиться правый верхний угол компонента. В результате этого на форме появляется компонент стандартного размера.

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

На рис. 6 представлен вид формы после добавления к ней трех полей редактирования.

Рис. 6. Форма с тремя компонентами — полями редактирования

Один компонент формы окружен восемью маленькими квадратиками (маркерами выделения). Он называется выделенным (маркированным). Свойства маркированного компонента отображаются в окне Object Inspector . Ниже в таблице перечислены основные свойства компонента «Поле редактирования».

Имя поля. Используется в программе для доступа к содержимому (тексту) поля