Использование пакета MathСAD в инженерных расчетах. Регеда В.В - 38 стр.

UptoLike

Составители: 

38
Рис. 22
ПРИМЕНЕНИЕ ПРОГРАММНЫХ БЛОКОВ
Применение условного оператора в программном блоке
f
x() 0 x 2>if
4x
2
otherwise
:= x 10 9.99, 10..:=
10 0 10
5
0
5
fx()
x
Применение оператора цикла for для вычисления суммы и
произведения последовательности целых чисел.
sum n() s 0
ssi+
i1n..for
:= prod n() p 1
ppi
i1n..for
p
:= prod 4() 24=
sum 10() 55=
prod 8( ) 4.032 10
4
×=
sum 25( ) 325=
Применение оператора цикла while и break для вычисления
первого элемента массива, превосходящего заданное число (1,98) и
выдачи индекса этого элемента.
m
0 2500..:= v
m
1 sin m()+:=
Cоздание массива
t v thesh,()j0
break max v( ) theshif
jj1+
v
j
theshwhile
j
v
j
:=
Инициализация счетчика
Отслеживание специального случая
Впервые восьмой элемент массива
превосходит заданную величину
t v 1.98,()
8
1.989
=
          ПРИМЕНЕНИЕ ПРОГРАММНЫХ БЛОКОВ
      Применение условного оператора в программном блоке

    f( x) := 0 if x > 2                          x := −10, −9.99.. 10
                         2                       5
                4−x          otherwise



                                         f( x)   0




                                                 5
                                                     10          0                 10
                                                                  x
      Применение оператора цикла for для вычисления суммы и
         произведения последовательности целых чисел.

sum( n ) := s ← 0                                         prod ( n) := p ← 1             prod ( 4) = 24
             for i ∈ 1.. n                                              for i ∈ 1 .. n
                                    sum( 10) = 55
               s←s+i                                                        p ← p⋅ i                          4
                                                                                          prod ( 8) = 4.032× 10
                                    sum( 25) = 325
                                                                        p

    Применение оператора цикла while и break для вычисления
 первого элемента массива, превосходящего заданное число (1,98) и
                выдачи индекса этого элемента.

     m := 0.. 2500             v := 1 + sin( m)                Cоздание массива
                                m
     t( v , thesh ) :=       j←0                                      Инициализация счетчика
                             break if max( v) ≤ thesh          Отслеживание специального случая
                             while v ≤ thesh
                                     j
                              j← j+ 1
                             ⎛ j⎞
                             ⎜v ⎟
                             ⎝ j⎠
                                                          Впервые восьмой элемент массива
                  t( v , 1.98) = ⎜
                                    ⎛ 8 ⎞
                                           ⎟              превосходит заданную величину
                                    ⎝ 1.989⎠
                                                     Рис. 22




                                                       38