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

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

Write(F, B, '}')

End;

Write(F, '\right):\left(');

If Abs(E) <> 1 Then Write(F, E)

Else If E = -1 Then Write(F, '-');

Write(F, X);

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

Write(F, G);

Write(F, Znak, '\frac{');

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

Write(F, X, '^2');

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

If Abs(O) <> 1 Then Write(F, O)

Else If O = -1 Then Write(F, '-');

Write(F, X);

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

Write(F, P, '}{');

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

Write(F, X);

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

WriteLn(F, B, '}\right)$;');

WriteLn(F)

End;

WriteLn(F);

WriteLn(F, '\end{document}');

Flush(F);

Close(F)

End.