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


 

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

64199. Участие медицинской сестры в подготовке пациентов с хирургическими заболеваниями живота к экстренным операциям 6.26 MB
  Достаточно установить что у больного имеется острое хирургическое заболевание органов брюшной полости и он нуждается в срочной госпитализации. У больного появляется тошнота рвота. Через несколько часов боли в животе могут на короткий срок утихнуть состояние больного несколько улучшается.
64200. ОРГАНИЗАЦИЯ УЧЕТА И ПРОВЕДЕНИЯ АНАЛИЗА ДВИЖЕНИЯ ДЕНЕЖНЫХ СРЕДСТВ В ОТКРЫТОМ АКЦИОНЕРНОМ ОБЩЕСТВЕ «ЯКУТОПТТОРГ» 624.24 KB
  Денежные средства – один из наиболее важных аспектов операционного цикла организации. Управления денежными потоками является тем инструментом, при помощи которого можно достичь желаемого результата деятельности предприятия – получения прибыли.
64201. Організація локальної обчислювальної мережі загальноосвітньої школи 4.01 MB
  Метою проектування є розрахунок топології і технічних характеристик локальної обчислювальної мережі, визначення апаратних і програмних засобів комплектації локальної обчислювальної мережі (ЛОМ) загальноосвітньої школи, розміщення вузлів мережі і каналів мережного зв'язку.
64202. Облік та аудит розрахунків з різними дебіторами 1.3 MB
  Метою дипломної роботи є встановлення достовірності ведення заборгованості за кожним дебітором термінами її виникнення й погашення; повноти та своєчасності відображення даних в зведених та облікових регістрах.
64203. Будівництво кафе дитячого на 64 місця 355.39 KB
  Повноцінне харчування дітей необхідна умова забезпечення їх здоров'ям, опору дії до інфекцій та інших несприятливих факторів, і здібностей до навчання в усі періоди дорослішання. Їжа єдине джерело життєво важливих речовин, необхідних для розвитку і формування дитячого організму...
64204. The Concept «GENTLEMAN» in the Novel of Charles Dickens «Great Expectations» 377.22 KB
  The aim of the diploma work is to establish Dickens’ understanding of the notion of GENTLEMAN within, by the discourse analysis, point out especial meaning and interpretation of the concept in the novel “Great Expectation”.
64205. Приостановление, прекращение и восстановление выплаты пенсии по действующему российскому законодательству 711.35 KB
  Однако по численности контингента и удельному весу расходуемых средств пенсии имеют преобладающее значение в общей системе материального обеспечения престарелых и нетрудоспособных граждан. За счет пенсии в денежной форме удовлетворяются самые разнообразные потребности человека в пище...
64206. Концентрация вредных веществ, мгновенно-опасная для жизни или здоровья 97 KB
  История вопроса Обсуждение того как использовать респираторы когда загрязнённость воздуха мгновенно-опасна для жизни или здоровья началось по крайней мере с начала 1940х. Неопасные случа это те когда загрязнённость воздуха не представляет мгновенной опасности для жизни или здоровья но создаёт сильный...
64207. СРЕДСТВА ИНДИВИДУАЛЬНОЙ ЗАЩИТЫ ОТ ВРЕДНЫХ ПРОИЗВОДСТВЕННЫХ ФАКТОРОВ 126 KB
  Типовой перечень ежегодно реализуемых работодателем мероприятий по улучшению условий и охраны труда и снижению уровней профессиональных рисков где значительное внимание уделено использованию СИЗ. Электронный каталог сертифицированных средств индивидуальной защиты...