Под буквой "Ж" в Паскале составить программу
10-11 класс
|
var a1, a2, b1, b2, c1, c2, x, y: real;
begin
write('Введите коэффициенты первого уравнения a, b, c: ');
readln(a1,b1,c1);
write('Введите коэффициенты второго уравнения a, b, c: ');
readln(a2,b2,c2);
y:=(b2+c2-c1*c2/a1)*a1/a2/b1;
x:=(-b1*y-c1)/a1;
writeln('Координаты точки пересечения: x=',x,'; y=',y)
end.
Другие вопросы из категории
Читайте также
Составить программу к.т. запрашивает буквы, пока не введут точку и находит количество букв "0".
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
2. Составить программу для упорядоченное двух элементов по убыванию.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.