Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Igor1337
0 / 0 / 0
Регистрация: 27.10.2013
Сообщений: 18
#1

Решить систему уравнений - Turbo Pascal

27.10.2013, 18:47. Просмотров 480. Ответов 1
Метки нет (Все метки)

не знаю как решить, помогите пожалуйста.
0
Миниатюры
Решить систему уравнений  
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.10.2013, 18:47
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Решить систему уравнений (Turbo Pascal):

Решить систему уравнений - Turbo Pascal
x2+5, x>5 y= x2+5x+2, x=5 x+4, x<5

Решить систему уравнений - Turbo Pascal
Здравствуйте! вот такая маленькая система, которую я не могу решить до конца! Вот что я сам написал, но она не считает минусовые...

Решить систему уравнений - Turbo Pascal
сабж. и блок-схемку замутить если вариант. спасибо

Решить систему уравнений - Turbo Pascal
sinx2+4 ,x>=2 cos5x ,x<2

Решить систему уравнений - Turbo Pascal
помогите пожалуйста решить решить систему уравнений y=\left\{\begin{matrix}ax+by=c \\dx+ey=f \end{matrix}\right.

Решить систему уравнений - Turbo Pascal
Уравнения в pascal.ipg

1
Samhain
689 / 564 / 186
Регистрация: 31.03.2013
Сообщений: 1,029
28.10.2013, 08:57 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Igor1337, уточните интервал для х. А то не понятно то ли х меняется от 0 до 72, то ли от 0.7 до 2, то ли Вы просто не написали. В общем так как деление на 0 маловероятно, то у меня взят интервал [0.7, 2).
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
const a=1.65;
var x,q:real;
begin
  x:=0.7;
  repeat
    if x<1.4 then q:=pi*x*x-7/(x*x)
    else if x=1.4 then q:=a*x*x*x+7*sqrt(x)
         else q:=ln(x+7*sqrt(abs(x+a)));
    writeln('Q(',x:0:1,') = ',q:0:4);
    x:=x+0.1;
  until x>=2;
  readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.10.2013, 08:57
Привет! Вот еще темы с ответами:

Решить систему уравнений - Turbo Pascal
a1*x+b1*y+c1=0 a2*x+b2*y+c2=0 (это система) нужно решить уравнение и программа должна выдавать x и y а все остальные условия задаёшь...

Решить систему дифференциальных уравнений - Turbo Pascal
Помогите,плиз.Мне нужно решить систему дифференциальных уравнений с начальными условиями,действующая на отрезке методом Эйлера.И...

Решить систему нелинейных уравнений - Turbo Pascal
Здравствуйте! Необходимо решить систему нел. уравнений sin(x+1)-y=1,2 2x+cos(y)=2

Решить систему линейных уравнений - Turbo Pascal
Решить систему линейных уравнений и вот собственно система не пойму как вообще её решать a1 - b1 - c1 - a2 - b2 - c2 - вводятся с...


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

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

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