Вычисление квадратного уравнения

@MadMen · Регистрация: 25.09.2009

Студворк — интернет-сервис помощи студентам

Есть код:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include "Math.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
double a,x,b,c,q,w,v,e;
a=Edit1->Text.ToDouble();
b=Edit2->Text.ToDouble();
c=Edit4->Text.ToDouble();
q=b*b-4*a*c;
if (q>0)
{
e=sqrt(q);
w=(-b+e)/(2*a);
v=(-b-e)/(2*a);
Memo1 ->Lines->Add(v);
Memo2 ->Lines->Add(w);
}
else if (q<0)
{
Memo1 ->Lines->Add("Нет решений");
Memo2 ->Lines->Add("Нет решений");
}
}
//---------------------------------------------------------------------------

Собственно, как видно, простейший способ нахождения корней квадратного уравнения. Но как сделать так, чтобы вместо трёх полей было одно, в которое можно было бы записать уравнение вида a*x*x+b*x+c=0 и получить уже в одном списке (Memo1) два корня?

В качестве ответа подойдёт хотя бы название оператора.

@MadMen · 28.09.2009, 18:40 **[ТС]**

Каким образом в поля Edit1, Edit2, Edit3 можно разрешить ввод только чисел? Если же в эти поля ввести символы (буквы, и пр. символы), то нужно(==хотелось бы), чтобы выскакивало сообщение о том, что введены неверные символы и программа не выполняла последующую обработку до повторного нажатия SpeedButton'a (в смысле до нового подсчёта).

Заранее извиняюсь за сумбурность мыслей, надеюсь, что хотя бы часть понятна.

Evg · 29.09.2009, 11:11

Проще всего игнорировать ввод букв и прочего. Обсуждалось много раз, нужно сделать обработчик события OnKeyPress для Edit'ов

Пример есть тут тут, но можешь поискать на форуме, где-то было более внятно расписано, мне просто искать лениво, нашёл первое, что содержит описание решения проблемы

@MadMen · 29.09.2009, 17:33 **[ТС]**

Благодарен.

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

нужно(==хотелось бы), чтобы выскакивало сообщение о том, что введены неверные символы и программа не выполняла последующую обработку

Уже нашёл выход с помощью

C++
1
ShowMessage(" тэкст ");

и с помощью

C++
1
return;

в конце цикла.

Новые блоги и статьи Все статьи Все блоги /
Алиса нашла кучу ошибок компиляции и запуска в проекте, который без проблем компилировался и запускался))) anaschu 30.06.2026 Я пока посмеюся, но завтра проверю. А вообще интерсно. Дал алисе файл, в котором точно нет ошибок компиляции и запуска, и попросил их найти. Нашла кучу))) Критические ошибки, мешающие компиляции и. . .	сукцессия 16. Общий обзор, в основном что бы другие ии поняли anaschu 29.06.2026 # Передаточный документ: модель микоризной сукцессии (для нового чата) Этот документ предназначен для того, чтобы новый чат Claude мог продолжить работу без необходимости заново разбираться в. . .	сукцессия 15 неявная схема anaschu 29.06.2026 Алиса Калибровка параметров симбиотической модели: технический обзор Содержание: Введение Постановка проблемы Технические аспекты реализации Процесс внедрения изменений	сукцессия 14. Обновленная схема модели anaschu 28.06.2026 ГЛОБАЛЬНАЯ ОПИСАТЕЛЬНАЯ СПЕЦИФИКАЦИЯ ЭКОСИСТЕМНОЙ МОДЕЛИ «SOIL CHEMISTRY & MYCORRHIZA 2. 0» https:/ / ibb. co/ NnkGpfMd Представленная интегрированная схема описывает непрерывную нелинейную. . .
сукцессия 13. Питон модель трехзонного мицелия, пока что в основном арбускулярного anaschu 28.06.2026 ## Разработка агентной модели микоризной сукцессии: от выявления артефактов к созданию комплексной системы ### Аннотация Представлено исследование по разработке агентной модели микоризной. . .	сукцессия 12. краткий список проверок модели перед запуском. anaschu 27.06.2026 Скрытые отказы в моделях систем динамики (SD-models) экологических систем: два случая из практики Контекст Разбирался прототип модели систем динамики (SD-модели) микоризной сукцессии: пять. . .	Сукцессия 11. Проверка орудий перед войной: разработка через тестирование anaschu 27.06.2026 Как не дать модели соврать самой себе: проверки для симуляции микоризной сукцессии Введение Когда вы строите математическую модель живой системы — грибов, растений, почвы — главная опасность. . .	10 сукцессия. Питон код войны грибов и растений anaschu 27.06.2026 import numpy as np class PlantAgent: def __init__(self, name, strategy, initial_biomass): self. name = name self. strategy = strategy # "greedy" (широколиственные) или. . .

@MadMen 1 / 1 / 1 Регистрация: 25.09.2009 Сообщений: 20
	28.09.2009, 18:40 [ТС]
	Каким образом в поля Edit1, Edit2, Edit3 можно разрешить ввод только чисел? Если же в эти поля ввести символы (буквы, и пр. символы), то нужно(==хотелось бы), чтобы выскакивало сообщение о том, что введены неверные символы и программа не выполняла последующую обработку до повторного нажатия SpeedButton'a (в смысле до нового подсчёта). Заранее извиняюсь за сумбурность мыслей, надеюсь, что хотя бы часть понятна. 0

Evg 21281 / 8305 / 637 Регистрация: 30.03.2009 Сообщений: 22,660 Записей в блоге: 30
	29.09.2009, 11:11
	Проще всего игнорировать ввод букв и прочего. Обсуждалось много раз, нужно сделать обработчик события OnKeyPress для Edit'ов Пример есть тут тут, но можешь поискать на форуме, где-то было более внятно расписано, мне просто искать лениво, нашёл первое, что содержит описание решения проблемы 1