42167

ДІЇ НАД МАТРИЦЯМИ

Лабораторная работа

Информатика, кибернетика и программирование

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

Украинкский

2013-10-27

137 KB

4 чел.

МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ

Дніпропетровський національний університет
ім. Олеся Гончара

Механіко-математичний факультет

Кафедра обчислювальної механіки і міцності конструкцій

З В І Т

про виконання лабораторної роботи №2

ДІЇ НАД МАТРИЦЯМИ 

 ШИФР  321987 

 Виконавець: студент групи МХ-10-3 Сергієнко  А.І Прийняла: Гарт Е.Л.

 Завдання отримано 10.11.10

 Звіт зданий  22.12.10

Дніпропетровськ

2010


ЗМІСТ

Анотація ...……………………………………………………………………...…1

Основна частина…………………………………………………………..............1

1. Постановка завдання…………………………………………………….1

2.Аналіз завдання (структурна блок-схема алгоритму)…………2

3. Інструкція щодо експлуатації програми……………………………….5

4. Результати розрахунків і аналіз………………………………………...5

Додаток. Лістинг програми………………………………………………………6

АНОТАЦІЯ

1. Постановка задачі

Обчислити матрицю А, де

,

де X – задане число;  провести деяку операцію над А, видати деякі значення S,  Sa, B, А.

2. Тип комп’ютера. Операційна система

Програма розрахована для ПК типу Pentium IV. Реалізована в ОС Windows XP.

3. Мова програмуванняCompaq Visual Fortran v6.6

4. Допоміжні програми – немає.

5. Стан програми – налагоджена.

ОСНОВНА ЧАСТИНА

1. Постановка завдання

Розробити структурну схему алгоритму та програму виконання дій над матрицею

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

 2. Аналіз завдання (структурна блок-схема алгоритму)

3. Інструкція щодо експлуатації програми

Вхідні дані:

коефіцієнт за завданням.

Вихідні дані:

№1 – сума модулів елементів кожного стовпчика А;  №2 – суми квадратів найбільшого елемента першого стовпчика та найменшого за модулем елемента останнього рядка; №3 матриця B визначена за формулою ; №4 поміняти місцями третій рядок і третій стовпчик.

4. Результати розрахунків і аналіз

№1

# стовпця

значення

1

42.2

2

27.0

3

33.8

4

28.3

5

37.8

№2

Шукані значення, при x=32, наведені у таблицях.

№2

188.2

№3

-183.01

-21.85

-175.09

-146.40

-187.44

0.04

47.42

-47.32

70.76

-7.69

82.58

79.04

30.34

53.16

99.12

76.64

68.54

66.60

18.94

116.80

-81.52

100.58

-108.76

-110.94

-126.78

№4

4.80

6.60

6.60

6.40

7.30

8.50

9.70

1.50

1.40

-1.00

-2.00

1.90

11.80

7.70

10.40

13.60

-2.60

8.30

10.40

7.40

8.70

6.60

14.60

-1.80

7.50

Додаток. Лістинг програми.

program lr2

PARAMETER N=5

real A(N,N), B(N,N), C(N,N)

integer i,j,k

real S,amax,amin

OPEN (UNIT=1, FILE='1.txt', STATUS='OLD',ERR=1000,      *ACTION='READ')

READ (1,*) ((B(i,j), j=1,N), i=1,N), ((C(i,j), j=1,N), i=1,N)

CLOSE (1)

WRITE (*,*) 'ucxod matrix'

WRITE (*,101) ((B(i,j), j=1,N), i=1,N), ((C(i,j), j=1,N), i=1,N)

DO i=1,N

DO j=1,N

 A(i,j)=B(i,j)+3.2*C(i,j)

ENDDO

ENDDO

WRITE (*,*) 'matrix'

WRITE (*,101) ((A(i,j), j=1,N), i=1,N)

WRITE (*,*) 'task 1'

DO i=1,N

 S=0

 DO j=1,N

  S=S+ABS(A(j,i))

 ENDDO

 WRITE (*,102) i,S

ENDDO

WRITE (*,*) 'task 2'

amax=A(1,1)

amin=ABS(A(N,1))

DO i=1,N

 IF (amax.LT.A(i,1))  amax=A(i,1)

 IF (amin.GT.ABS(A(N,i)))  amin=ABS(A(N,i))

ENDDO

S=amax*amax+amin*amin

WRITE (*,103) S

WRITE (*,*) 'task 3'

DO i=1,N

 DO j=1,N

  C(i,j)=A(i,j)-A(j,i)

 ENDDO

ENDDO

DO i=1,N

 DO j=1,N

  S=0

  DO k=1,N

   S=S+C(i,k)*A(k,j)

  ENDDO

  B(i,j)=S

 ENDDO

ENDDO

WRITE (*,*) 'matrix (A-AT)*A'

WRITE (*,104) ((B(i,j), j=1,N), i=1,N)

WRITE (*,*) 'task 4'

DO i=1,N

 S=A(3,i)

 A(3,i)=A(i,3)

 A(i,3)=S

ENDDO

 

WRITE (*,*) 'matrix A'

WRITE (*,104) ((A(i,j), j=1,N), i=1,N)

1000 STOP

101 FORMAT ((<N>(' ',F6.2)))

102  FORMAT (' col ' ,I1,' : ',F8.4)

103  FORMAT (' ans= ' ,F8.4)

104 FORMAT ((<N>(' ',F8.2)))

END

End


 

А также другие работы, которые могут Вас заинтересовать

34249. МЕДИЦИНСКАЯ ЭКОЛОГИЯ 13.27 KB
  Устанавливается причино-следственные связи между состоянием среды и здровья, разрабатывает методы диагностики и профилактики, неблагоприятного влияния среды на человека
34250. Основные экологические проблемы современности 11.51 KB
  На планету вываливаются горы отбросов; человек провоцирует природные катастрофы.не подрывать природные ресурсы сдерживание роста населения; развитие новых промышленных технологий позволяющих избежать загрязнения поиск новых чистых источников энергии; увеличение производства продовольствия без роста посевных площадей.
34252. Популяция 63.47 KB
  Закон Харди Вайнберга: Частоты генов и генотипов в популяции остаётся неизменным из поколения в поколение. Численность популяции важная экологическая характеристика популяции. Это общее количество особей в популяции. Колебания численности Изменение численности популяции складывается за счет явлений: рождаемости смертности вселения и выселения.
34253. Микро эволюция 45.12 KB
  Критерии вида: морфологический позволяет различать разные виды по внешним и внутренним признакам; физикобиохимический фиксирует неодинаковость химических свойств разных видов; географический каждый вид обладает своим ареалом; экологический позволяет различить виды по комплексу абиотических и биологических условий в которых они сформировались приспособились к жизни; репродуктивный обуславливает репродуктивную изоляцию вида от других даже близкородственных. Целостность вида обусловлена...
34254. Естественный отбор 15.03 KB
  Стабилизирующий форма отбора при котором действие направлено против особей имеющих крайние отклонения от средней нормы в пользу особей со средней выраженностью признака. отбора ввел Шмальгаузен. Движущий форма отбора которая действует при направленном изменении окр. Дизруптивный форма отбора при которой сохраняются особи с крайними вариантами изменчивости а особи с промежуточным проявлением признака подвергаются отрицательному отбору.
34255. Антропогенез 18.08 KB
  Место человека в системе животного мира. Биологические особенности человека: сложный мозг; вертикально ориентированный скелет; развитая НС и ВНД; подвижные пальцы; объемное цветовое зрение. Особенности человека связанные с прямо хождением: мощная мускулатура нижних конечностей; Sобразный изгиб позвоночника; широкий таз; сводчатая стопа; более мощное развитие костей нижних конечностей; грудная клетка уплощена в спиннобрюшном направлении; большой палец ноги не противопоставлен остальным.
34256. Медицинская экология. Экологически зависимые заболевания 15.69 KB
  Экологически зависимые заболевания болезни которые при загрязнении окруж. Это заболевания органов дыхания в т.железы и многие другие заболевания развитие которых обусловлено комплексом генетических иммуногенетических инфекционных и других факторов.