Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.97/117: Рейтинг темы: голосов - 117, средняя оценка - 4.97
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
1

решение линейных уравнений Паскаль

09.03.2011, 20:54. Показов 22105. Ответов 10
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Уважаемые форумчани! поделитесь парочку примерами по данной теме! с алгоритмом)

весьма благодарен
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.03.2011, 20:54
Ответы с готовыми решениями:

Решение линейных уравнений
Составьте программу, которая умеет решать линейные уравнения (уравнения вида Ах+В=0)....

Решение систем линейных уравнений
Выводит ошибку 200 Division by zero (Деление на ноль)), никак не могу исправить, работаю на...

Решение системы линейных уравнений
на форуме есть решение , где матрицу приводят к треугол. виду, а можно эту задачу с оператором...

Решение системы линейных уравнений
Добрый день помогите пожалуйста с программой ребят. Паскаль ругается на вот эту строчку:...

10
37 / 32 / 9
Регистрация: 04.03.2011
Сообщений: 120
09.03.2011, 21:03 2
А что тут такого?)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses
  crt;
 
var
  a, b: real;
 
begin
  writeln('Задайте параметры (a*x+b=0):');
  write('A=');
  readln(a);
  write('B=');
  readln(b);
  writeln('X=', (-b / a));
  readkey;
end.
1
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
09.03.2011, 21:07  [ТС] 3
ещё бы одну
0
37 / 32 / 9
Регистрация: 04.03.2011
Сообщений: 120
09.03.2011, 21:10 4
Цитата Сообщение от west23 Посмотреть сообщение
ещё бы одну
Но линейные уравнения имеют общий вид: a*x+b=0. Какие же еще могут быть варианты?) Разве что можно точность задавать..
1
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
09.03.2011, 21:54  [ТС] 5
с точностью сделаешь?
0
37 / 32 / 9
Регистрация: 04.03.2011
Сообщений: 120
09.03.2011, 23:25 6
Вот:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses
  crt;
 
var
  a, b: real;
  k: integer;
 
begin
  write('Точность до: ');
  readln(k);
  writeln('Задайте параметры (a*x+b=0):');
  write('A=');
  readln(a);
  write('B=');
  readln(b);
  b := -b / a;
  if int(((b * k) - int(b * k)) * 10) < 5 then
    a := int(b * k) / k
  else
    a := int(b * k + 1 ) / k;
  writeln(a);
  readkey;
end.
1
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
09.03.2011, 23:41  [ТС] 7
а что такое Условия выбора в паскале?
0
37 / 32 / 9
Регистрация: 04.03.2011
Сообщений: 120
09.03.2011, 23:45 8
К примеру:
if {условие выбора} then

Почитай это пособие по паскалю.
1
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
09.03.2011, 23:46  [ТС] 9
пример можешь предоставить??тоже парочку...каким нибудь легких программ
0
Фрилансер
Эксперт С++
5845 / 1226 / 499
Регистрация: 23.11.2010
Сообщений: 3,375
Записей в блоге: 1
09.03.2011, 23:50 10
west23, используйте поисковник форума. Это не раз решалось
0
18 / 15 / 0
Регистрация: 22.12.2009
Сообщений: 404
09.03.2011, 23:51  [ТС] 11
та не могу найти ничего! вот и вас прошу
0
09.03.2011, 23:51
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.03.2011, 23:51
Помогаю со студенческими работами здесь

Решение системы линейных уравнений
1. Найти решение системы линейных уравнений в виде A^(-1) * B 2. Найти решение системы линейных...

Решение системы линейных уравнений
Найти решение системы линейных уравнений по методу Зейделя. A=\left(...

Решение системы линейных уравнений
Написать программу для решения системы линейных уравнений a1x+b1y=c1 a2x+b2y=c2 (цифры это...

Решение системы линейных уравнений методом Холецкого
Помогите решить написать систему уравнений. Решение системы линейных уравнений методом Холецкого....


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

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru