Вычислить значение выражения и вывести его на экран

@дд · Регистрация: 31.10.2015

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

Вычислить значение выражения x = (b*f)3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран.
Я не понимаю куда писать b= - 3c-a и f=7+а? Пробовал писать в раздел констант, но пишет ошибку компилятор.
Вот что у меня получилось в исходном коде:

Pascal
1
2
3
4
5
6
7
8
9
10
procedure TForm1.Button1Click(Sender: TObject);
const
  b:=-3c-a;
  f:=7+a;
var
  x:Real;
begin
   x:=exp(3*ln(b*f))-f/2;
   label1.caption:=FloatToStr(x);
end;

Что не так? Отвечайте в стиле "для чайников", я программированием никогда не занимался.

Добавлено через 1 час 8 минут
ответьте пожалуйста!! очень нужно

@volvo · 31.10.2015, 13:50

Откуда берутся a и c? Если это константы - то можно и в разделе констант описать:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.Button1Click(Sender: TObject);
const
  a = ... ; // подставь нужное значение a
  c = ... ; // тут подставь значение для c
  b = -3c-a;
  f = 7+a;
var
  x:Real;
begin
   x:=exp(3*ln(b*f))-f/2;
   label1.caption:=FloatToStr(x);
end;

, если должно вводиться пользователем - то все будет по другому.

@Puporev · 31.10.2015, 13:51

В эдиты ввести а,с .

Pascal
1
2
3
4
b:=-3*c-a;
f:=7+a;
y:=b*f;
x:=y*y*y-f/2;

@дд · 31.10.2015, 14:12 **[ТС]**

В том то и дело, что численные значение а и с не даны. На форме есть только кнопка и label. В итоге, нажимая на кнопку, у нас в lebal будет, как я понял, выражение, в котором будут присутствовать а и с.

Возможно вообще такое сделать?

@Puporev · 31.10.2015, 14:15

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

На форме есть только кнопка и label.

А положить на форму еще и 2 эдита никак?

Добавлено через 57 секунд
Если уж совсем никак, объявите абс константами.

@дд · 31.10.2015, 14:17 **[ТС]**

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

Если уж совсем никак, объявите абс константами.

как это делается?

@Puporev · 31.10.2015, 14:19

Delphi
1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
const
  a =2; 
  c = 3 ;

@дд · 31.10.2015, 14:59 **[ТС]**

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

a =2; c = 3 ;

Я никак не могу ставить произвольные значения а и с.
Мне нужно, чтобы результат вычисления был выражением, в котором а и с - переменные.
По сути дела нужно избавиться от b и f, заменив их соответствующими выражениями через а и с.

Я так понял это задание. Может я и ошибаюсь

Добавлено через 33 минуты
Ещё один вопрос, но по другой задаче, если можно. Как поставить знак математического модуля в выражении ( в исходном коде)?

@Puporev · 31.10.2015, 16:13

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

Как поставить знак математического модуля

Delphi
1
abs(x);

@дд · 01.11.2015, 16:26 **[ТС]**

А по первой задачи у меня что получается: программа или приложение?

Добавлено через 23 часа 20 минут
А вот если делать так, что в эдит1 будем писать значение а, а в эдит2 значение с, то у меня получается какое-то несоответствие класс исключение 203 и выделилась строка с иксом:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.Button1Click(Sender: TObject);
var
  x,b,f,a,c:real;
begin
  a:=StrToFloat(edit1.text);
  c:=StrToFloat(edit2.text);
  b:=-3*c-a;
  f:=7+a;
  x:=exp(3*ln(b*f))-f/2;
  Label1.caption:=FloatToStr(x);
end;
 
end.

Добавлено через 30 секунд
кто разбирается помогите пожалуйста!!

@Puporev · 01.11.2015, 16:57

Я тебе уже показал как писать

Delphi
1
2
3
4
b:=-3*c-a;
f:=7+a;
y:=b*f;
x:=y*y*y-f/2;

Если b*f<=0 то exp(3*ln(b*f)) работать не будет.

Добавлено через 1 минуту

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

А по первой задачи у меня что получается: программа или приложение?

Это Вы о чем?

@дд · 01.11.2015, 22:31 **[ТС]**

Puporev,
Спасибо, все работает!
И правда: там ведь под логарифмическое выражение не должно быть отрицательным или равным нулю.

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@дд 0 / 0 / 0 Регистрация: 31.10.2015 Сообщений: 17
	31.10.2015, 14:12 [ТС]
	В том то и дело, что численные значение а и с не даны. На форме есть только кнопка и label. В итоге, нажимая на кнопку, у нас в lebal будет, как я понял, выражение, в котором будут присутствовать а и с. Возможно вообще такое сделать? 0

@дд 0 / 0 / 0 Регистрация: 31.10.2015 Сообщений: 17
	01.11.2015, 22:31 [ТС]
	Puporev, Спасибо, все работает! И правда: там ведь под логарифмическое выражение не должно быть отрицательным или равным нулю. 0