Реферат: Генерация дидактических материалов по математике

Else If G1 = -1

Then Write(F, '-')

Else Write(F, '+');

Write(F, X);

End;

If O1 <> 0

Then Begin

If O1 < 0

Then Begin Write(F, '-'); O1 := -O1; P1 := -P1 End

Else Write(F, '+');

Write(F, '\frac{');

If O1 <> 1 Then Write(F, O1);

Write(F, X);

If P1 <> 0

Then Begin If P1 > 0 Then Write(F, '+');

Write(F, P1)

End;

Write(F, '}');

End

Else If P1 <> 0

Then Begin If P1 < 0

Then Write(F, '-')

Else Write(F, '+');

Write(F, '\frac{', Abs(P1), '}');

End;

If (O1 <> 0) Or (P1 <> 0)

Then Begin

Write(F, '{');

If A <> 1 Then Write(F, A);