Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Кравчук(mathcad) / 1 семестр / Visual_Basic_6.0._Посiбник_2009

.pdf
Скачиваний:
22
Добавлен:
29.02.2016
Размер:
5.8 Mб
Скачать

Алгоритми циклічної структури – це такі алгоритми, у яких одні й ті ж дії повторюються багаторазово в залежності від початкових даних або проміжних результатів.

Алгоритми циклічної структури бувають: арифметичні та ітераційні. В арифметичних циклах число повторень наперед відоме. В ітераційних циклах вихід із циклу залежить від виконання умови.

Приклад 4

Обчислити:

y tg a3

 

a2 x2 ;

a 4,7 ;

x 0,1 ; 0,2 ; ... ; 1,5

Позначимо:

1)перше значення параметру – x1 = 0,1;

2)відповідно останнє – xn = 1,5;

3)крок – x = x2 - x1 = 0,1.

Початок

Введення

a, x1, xn, x

x = x1, xn, x

y tga3 a2 x2

Виведення

x, y

Кінець

10

Приклад 5

Обчислити наближене значення суми спадного ряду

s

 

 

x k

sin k

 

 

 

 

 

 

4

k 3

ln k 2,5

 

k 1 k

з точністю = 10 –5 ; x = 0,7.

Початок

Введення x,ε

k=1;s=0

H

xk sink

k4 k3 lnk 2,5

S=S+H

+

H/S

k= k+1

Виведення k,S,|H/S|

Кінець

11

Приклад 6

Обчислити довжину вектора b = {b1, b2, … bn}

 

n

 

d

b i2

 

i

1

Початок

Введення n

Введення

компонент вектора b

s=0

i=1,n

Виведення

bi

s = s + bi2

d s

Виведення d

Кінець

12

Приклад 7

Задано вектор x xi (i 1,n ; n 10). Формування компонент вектора виконати за допомогою Rnd у діапазоні цілих чисел [d1,d2] , де d1 = –10 ; d2 = 10. Розташувати компоненти вектора Х в порядку зростання. Обчислити суму, добуток та кількість від’ємних компонент вектора Х.

Початок

Введення

n, d1, d2

i = 1,n

xi = [(d2- d1+1)

Rnd]+d1

yi = xi

Виведення

xi

i =1,n-1

j = 1,n-i

yj>yj+1

+

w= yj

yj = yj+1

yj+1 = w

1

1

i =1, n

Виведення

yi

s = 0

p = 1

k = 0

i = 1, n

xi < 0

+

s = s + xi

p = p xi

k = k+1

Виведення

s, p, k

Кінець

13

Приклад 8

Задано вектор x xi (i 1,n ; n 15). Формування компонент вектора виконати за допомогою Rnd у діапазоні цілих чисел [d1,d2] , де d1 = 10 ; d2 = 30. Знайти максимальне значення та його номер серед парних компонент вектора х і мінімальне значення та його номер серед непарних компонент вектора x.

Початок

Введення

n, d1, d2

i= 1,n

xi = [(d2- d1+1)

Rnd]+d1

Виведення xi

max = –105

min = 105

1

 

 

 

1

 

 

 

 

i=1,n

 

 

 

d

x

 

x

 

 

 

i

 

 

i

 

 

2

 

2

 

 

d = 0

 

 

 

 

 

 

+

 

 

 

 

 

 

xi > max

 

 

max = xi

 

 

k = i

 

 

 

Пояснення:

при умові d = 0 – компоненти вектора парні, а при d ≠ 0 – непарні.

xi < min

min = xi

m = i

Виведення

max, k

Виведення min, m

Кінець

14

Приклад 9

Задано вектор x xi (i 1,n ; n 6). Формування компонент вектора виконати за допомогою Rnd у діапазоні цілих чисел [d1, d2] , де d1 = –5; d2 = 5. Компоненти вектора y обчислюються за формулою:

yi 0,1 tg(0,5 i ) ; i 1,n

; n 6

n

 

Обчислити скалярний добуток p x y xi yi , середнє арифметичне

i 1

вектора х та середнє геометричне вектора y.

Початок

Введення

n, d1, d2

i = 1,n

xi = [(d2- d1+1)

Rnd]+d1

Виведення

xi

i = 1,n

yi = 0,1- tg (0,5-i)

Виведення

yi

p=0

 

i = 1,n

 

p = p + xi

yi

1

1

s

= 0; r = 1

 

i = 1, n

 

s = s + xi

r = r yi

Sa s

n

Sg nr

Виведення p

Виведення

Sa, Sg

Кінець

15

Приклад 10

Задано матрицю Anxm та вектор X xj (i 1,n ;j 1,m ; n 4; m 5) . Формування компонент вектора та елементів матриці виконати за допомогою Rnd у діапазоні цілих чисел [f1, f2], де f1 = –10 ; f2 = 10. Обчислити добуток матриці Anxm на вектор х ( с = А х ) за формулою:

m

Початок

Введення

n, m, f1, f2

i= 1,n

j=1,m

aij=[(f2- f1+1)

Rnd]+f1

Виведення

aij

i =1,m

xi=[(d2- d1+1) Rnd]+d1

Виведення xi

1

ci aij xj j 1

1

i = 1,n

s = 0

j =1,m

s = s + aij xj

ci = s

Виведення

ci

Кінець

16

Приклад 11

Задано матрицю Anxm (i 1,n ;j 1,m ; n 3; m 4) . Формування елементів матриці виконати за допомогою Rnd у діапазоні цілих чисел [f1, f2], де f1 = –20 ; f2 = 20. Сформувати вектор b, компонентами якого є максимальні елементи стовпців матриці А.

Початок

1

 

 

j=1,m

Введення

max = –105

n, m, f1, f2

 

i=1,n

i=1,n

 

aij> max

j=1,m

+

 

aij=[(f2- f1+1)

max = aij

 

Rnd]+f1

 

Виведення

bj = max

aij

Виведення

 

 

bj

1

Кінець

17

Приклад 12

Задано матрицю Anxm

(i

Початок

 

Введення

 

n, m, f1, f2

 

i=1,n

 

j=1,m

 

aij=[(f2- f1+1)

 

Rnd]+f1

 

Виведення

 

aij

 

k = 0

 

i = 1,n

 

i k1

+

1,n ;j 1,m ; n 4; m 5) .

Формування елементів матриці виконати за допомогою Rnd у діапазоні цілих чисел

[f1, f2], де f1 = –20 ; f2 = 20. Сформувати матрицю B, вилучивши із матриці А k1–й

рядок ( k1 = 3).

1

i=1,n-1

j =1,m

Виведення

bij

Кінець

k = k+1

j = 1,m

bkj = aij

1

18

Приклад 13

Задано матрицю Anxm

(i

Початок

 

Введення

 

n, m, f1, f2

 

i=1,n

 

j=1,m

 

aij=[(f2- f1+1)

 

Rnd]+f1

 

Виведення

 

aij

 

1,n ;j 1,m ; n 4; m 5) .

Формування елементів матриці виконати за допомогою Rnd у діапазоні цілих чисел

[f1, f2], де f1 = –20 ; f2 = 20. Сформувати век-

тор c, компонентами якого є суми елементів стовпців матриці А.

j = 1,m

S=0

i = 1,n

s = s + aij

cj = s

Виведення

cij

Кінець

19