Проверишь правильно ли посчитал , поздно уже, мог ошибиться с кучей буковок 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 главы учебника по информатике.