Программирование в математическом пакете Mathcad. Воскобойников Ю.Е - 21 стр.

UptoLike

21
S( ),,nab j0
for
if
v
j
k
j j1
()mod ( ),ka 0 ( )mod ( ),kb 0
k..1n
v
2.7. Дополнительные операторы программирования
циклов в пакете MathCAD7Professional
Оператор continue. Обычно используется для продолже-
ния выполнения цикла путем возврата в начало тела цикла. Сле-
дующий пример поясняет работу этого оператора.
Пример 2.14. Составим программу-функцию, форми-
рующую новый вектор из положительных проекций исходного
вектора.
form_vec v() i 0
j 0
ii1
continue v
i
0if
jj1
w
j
v
i
i last v()
<
while
w
В теле программы-функции используется функция last(v), опре-
деляющая индекс последнего элемента массива v ( см. замечание
2.5).
Обращение к этой программе функции имеет вид
       S(n,a ,b)   j    0
                   for k ∈ 1 .. n
                       if ( mod ( k , a ) 0 )               ( mod ( k , b ) 0 )
                            vj       k

                            j    j       1
                   v

       2.7. Дополнительные операторы программирования
               циклов в пакете MathCAD7Professional

      Оператор continue. Обычно используется для продолже-
ния выполнения цикла путем возврата в начало тела цикла. Сле-
дующий пример поясняет работу этого оператора.

       Пример 2.14. Составим программу-функцию, форми-
рующую новый вектор из положительных проекций исходного
вектора.
            form_vec ( v ) i 0
                                             j    0

                                             while i< last ( v )
                                                  i     i      1

                                                      continue if vi         0

                                                  j     j      1

                                                  wj         vi

                              w
В теле программы-функции используется функция last(v), опре-
деляющая индекс последнего элемента массива v ( см. замечание
2.5).
      Обращение к этой программе функции имеет вид




                                                 21