Блог учителя Информатики

30 Мар 2015
0 Комментариев

Решение задачи Begin40


Условие задачи:

Найти решение системы линейных уравнений вида
A1·x + B1·y = C1,
A2·x + B2·y = C2,
заданной своими коэффициентами A1, B1, C1, A2, B2, C2, если известно, что данная система имеет единственное решение.
Воспользоваться формулами x = (C1·B2 − C2·B1)/D, y = (A1·C2 − A2·C1)/D, где D = A1·B2 − A2·B1.


uses
  PT4;

var
  a1, b1, c1, a2, b2, c2, d, x, y: real;

begin
  Task('Begin40');
  read(a1, b1, c1, a2, b2, c2);
  d := a1 * b2 - a2 * b1;
  x := (c1 * b2 - c2 * b1) / d;
  y := (a1 * c2 - a2 * c1) / d;
  write(x, y);
end.



Поделиться:
, , , , , ,
Вам также может понравится
Округление чисел в Python
Обмен значений двух переменных
Перевод чисел в Python
Снегопад из снежинок на Python с помощью Черепашки

Оставьте комментарий

Популярное

IBM 1401 компилирует и запускает FORTRAN II
0 Комментариев
Установка Windows на ноутбук Acer, когда не определяется SSD накопитель
Комментарии отключены
Алгоритмы на Python 3. Лекция №1
0 Комментариев
Алгоритмы на Python 3. Лекция №2
0 Комментариев
Алгоритмы на Python 3. Лекция №3
0 Комментариев

Новое

Округление чисел в Python
21 Ноя 2023
Обмен значений двух переменных
11 Дек 2022
Перевод чисел в Python
05 Дек 2022
Решение олимпиадных задач по информатике: Полевые работы
02 Дек 2022
Решение олимпиадных задач по информатике: Линейный футбол
14 Ноя 2022