Написать программу для решения следушего задания

Тема в разделе "Delphi - FAQ", создана пользователем Joy9, 15 ноя 2007.

Статус темы:
Закрыта.
  1. Joy9

    Joy9 Гость

    Я написал задачу, но кажется немного не правильно, помогите исправит!
    Пожалуйста!

    Написать программу для решения следушего задания:3
    По заданым кооэфицентам и правым частям уравнений системы
    _
    |a1x+b1y=c1
    /
    \
    |_a2x+b2y=c2

    Найти её решение в предположение, что определитель системы не равен нулю.
    Код (Text):
    program m23;
    uses crt;
    var a1,x,b1,y,c1,a2,b2,c2,c:integer;
    begin
    writeln('vvedite');
    readln;
    if c=c1 then
    begin
    C1:=a1*x+b1*y;
    C2:=a2*x+b2*y;
    writeln('vivod ',c1,c2);
    readln;
    end;
    end.
    Заранее всех Благодарю!
     
  2. root

    root Гость

    Для: Joy9
    Код (Text):
    Тебеже систему надо решить, сначало вырази х через y
    a1x+b1y=c1 тогда a1x=c1-b1y =>x=(c1-b1y)/a1
    затем подставь во торое уравнение(где a1,b1,c1,a2,b2,c2 числа)
    тоесть
    a2*((c1-b1y)/a1)+ b2y=c2=>(a2c1+a2b1y)/a1+b2y=c2=>(a2c1+a2b1y)+b2ya1=c2a1=>a2b1y+b2a1y=c2a1-a2c1=>дальше решить уравнение и подставить в систему
    P.S Алгебра помойму 9 класс :)
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей