Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата

   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);

          Write(F, X);

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

Рекомендуем скачать другие рефераты по теме: реклама реферат, реферат на тему види.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата