ТурбоПАСКАЛЬ,решите плиз

[(SvA)]

Помагите плиз решить систему в турбопаскале сам не понимаю как делать и вообще не программер,а сдавать надо в четверг,помогите плиз кто умеет,заранее благодарен ........ ax+by=f cx+dy=q здесь a,b,c,d,f,q-заданные числа,x,y-неизвестны

[cr_az2]

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

 

ax + by = c

dx + ey = f

 

y = ( ( c / d ) -a * f ) / ( -e * a + d * b )

 

Получившийся y подставляешь в формулу x = ( c - b * y) / a

 

На паскале не писал сто лет . . .

 

program laba(input, output);

var a, b, c, d, e, f, x, y :real;

begin
          readln(  a, b, c, d, e, f );

          y =  ( ( c / d  ) -a * f ) / ( -e * a + d * b );
          x = ( c - b * y) / a;

          writeln( x );
          writeln( y ):
end.

 

 

Программа просто считывает 6 чисел и выводит результат, если надо очень - вывод оформишь сам. Писал без компилятора, тряс стариной. А вообще - выговор тебе, ленишься прочесть 2 главы учебника по информатике.

[(SvA)]

Спасибо.

[(SvA)]

Сделайте милость решите еще одну плиз. Задание:дано действительное число "х".Вычислить при S=(х-2)*(х-4)*...*(х-64)/(х-1)*(х-3)*...*(х-63) при х=18,75

[Troyan]

Тебе не кажется,что это переходит некоторые границы?Пора уже самому решать задачи,а не в интернете целыми днями висеть.Может ещё и курсовую работу за тебя сделать?

[dаs]

ужс, куда мир катится??

Задачка ведь на 5 минут, мда уж...

[XsasaX]

dаs, a я вaпщe кромe Delfi нифигa низнaю. :-)

[Troyan]

Я тоже Паскаль не знал.Но всё-таки научился,иногда просил "головастых" немного объяснить,как да что.Впринципе,если понять,что означает каждый элемент,тогда во всем разберешься.А таким образом ты ни чему не научишься.

P.S. Я считаю лучше тему закрыть.

[__etc]

dаs, a я вaпщe кромe Delfi нифигa низнaю. :-)

Хм, а я вот, например, крестиком вышивать не умею. Но я же не говорю об этом в темах про кройку и шитье.