Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
Алина3421
-1 / 0 / 1
Регистрация: 19.05.2016
Сообщений: 54
1

рябят, выручите, Вычислить корень уравнения 2x/a +b-12=0 при различных значениях параметров a, b

19.01.2017, 07:24. Просмотров 761. Ответов 2
Метки нет (Все метки)

Всем привет, выручите, Вычислить корень уравнения 2x/a +b-12=0 при различных значениях
параметров a, b. Значения a, b ввести с экрана. Заранее спасибо, буду благодарна помощи!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.01.2017, 07:24
Ответы с готовыми решениями:

сколько различных способов есть у зайца добраться до вершины лестницы при заданных значениях K и N
Доброго времени суток, уважаемые форумчане! Есть задача: В нашем зоопарке...

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

Вычислить с заданной точностью корень уравнения
1. Вычислить с точностью корень уравнения X*4+0,8x*3- 0,4x*2-1,4x-1,2=0...

Методом хорд вычислить с точностью E корень уравнения
Методом хорд вычислить с точностью E корень уравнения X^2-sin5x=0 Корень...

Методом итераций вычислить с точностью eps корень уравнения
Помогите решить задание чайнику , пожалуйста Методом итераций вычислить с...

2
AHBAR
239 / 239 / 167
Регистрация: 05.04.2013
Сообщений: 1,111
19.01.2017, 08:42 2
Лучший ответ Сообщение было отмечено Алина3421 как решение

Решение

Алина3421,
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program kore;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
VAR
a,b:Integer;
 
begin
  { TODO -oUser -cConsole Main : Insert code here }
write('a='); readln(a);
write('b='); readln(b);
write('x=',(12-b)*a/2:8:2);
readln;
end.
0
Алина3421
-1 / 0 / 1
Регистрация: 19.05.2016
Сообщений: 54
19.01.2017, 08:44  [ТС] 3
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.Button1Click(Sender: TObject);
var b,a:real;
begin
  a:=StrToFloat(Edit1.text);
  b:=StrToFloat(Edit2.text);
  Label1.Caption:=FloatToStr((12-b)*a/2);
end;
 
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.01.2017, 08:44

Найти корень нелинейного уравнения F(x)=0 методом половинного деления. Крайние значения предела ([a,b]) , содержащий корень и погрешность (\epsilon )
Найти корень нелинейного уравнения F(x)=0 методом половинного деления. Крайние...

Вычислить значение функции при заданных значениях аргумента
Как решать системы такого типа? Помогите решить,знающие люди.

Вычислить значения функции Y при заданных значениях аргумента X
http://www.cyberforum.ru/attachment.php?attachmentid=114614&stc=1&d=1324202227


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru