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


 

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

39970. Расчет эффективности проекта реконструкции ОАО «Газпром нефтехим Салават» установка АВТ-4, цех №14 642.35 KB
  При общем объеме экспорта дизельного топлива из России в дальнее зарубежье в количестве 386 млн тонн дизельное топливо класса Евро5 составляет около 22 т. На российских НПЗ около половины всех печных агрегатов имеют КПД 50 60 при среднем показателе на зарубежных заводах 90. Рисунок 4 Индекс Нельсона на НПЗ в РФ Наличие на НПЗ процессов прямой перегонки нефти и установок улучшающих качество прямогонных фракций позволяют получить глубину не более 60 наличие процессов переработки вакуумного газойля увеличивает глубину...
39971. Разработка организации технического обслуживания и ремонта МТП в ЦРМ хозяйства с годовым объемом работ 56000 часов 205.66 KB
  В курсовом проекте рассчитана центральная ремонтная мастерская хозяйства обоснован технологический процесс технического обслуживания и ремонта машинного парка в ЦРМ хозяйства с годовым объемом работ 56000 часов разработан компоновочный план ЦРМ технологическая планировка участка ТО и диагностики разработан генеральный план РОБ хозяйства спроектирован технологический процесс восстановления оси произведена техникоэкономическая оценка ЦРМ. Распределение годового объема работ по объектам ремонта 1. Технологический процесс ТО и ремонта...
39972. Процесс деятельности предприятия, в области управления персоналом, отраженный на диаграммах нотации IDEF0 692.17 KB
  В рамках деятельности по управлению персоналом возникает закономерная потребность оценки состояния человеческого ресурса. Соответственно основной целью является не только проведение процедуры оценки но и процесс использования результатов. В рамках данной темы планируется рассмотреть в теоретической части: привязка процесса оценки к конкретной категории персонала или подразделению организации; установление взаимосвязи деловой оценки с другими направлениями деятельности службы управления персоналом: обучением управлением карьерой...
39973. Классификация причин уязвимости Windows NT 36.89 KB
  Классификация пользователей Unix Суперпользователь Обычные пользователи Специальные пользователи Псевдопользователи Классификация пользователей Windows Администраторы Обычные пользователи Специальные пользователи Псевдопользователи Анонимный пользователь Уязвимости Unix Наличие демонов Механизм SUID SGIDпроцессов Излишнее доверие Человеческий фактор Уязвимости Windows Серверы Системные процессы Анонимный пользователь Человеческий фактор Совместимость с другими ОС Классификация причин уязвимости Windows...
39976. Сравнение средств разграничения доступа к файлам в Unix и Windows 194.26 KB
  Они включают в себя начальную интерактивную процедуру отображающую начальный диалог с пользователем на экране и удаленные процедуры входа которые позволяют удаленным пользователям получить доступ с рабочей станции сети к серверным процессам Windows. Угрозы безопасности в сети Интернет: анализ сетевого трафика и шторм ложных TCPзапросов 4. Анализ сетевого трафика сети Internet В сети Internet основными базовыми протоколами удаленного доступа являются TELNET и FTP File Trnsfer Protocol. Особенностью протоколов FTP и TELNET является то что...
39977. Различия между семействами операционных систем Windows для рабочих станций 200.82 KB
  Различия между семействами операционных систем Windows для рабочих станций Рабочая станция Рабо́чая ста́нция англ. Microsoft Windows Все версии традиционно делятся на 4 группы: 16ти разрядные расширения MSDOS 1.0 windows 2.11 с 1986 по 1997 Windows9x с остатками MSDOS win95 98 ME с 1995 по 2003 WindowsNT современная линейка для ПК NT3.
39978. Методы увеличения вычислительной производительности 92.37 KB
  Однако процесс обработки команд и данных нельзя нашинковать в произвольных местах на любое число кусков хотя авторы последних модификаций Pentium 4 сделали такую попытку получив в результате очень горячий и высокочастотный но умеренно производительный процессор. При возникновении в программе любого ветвления что по статистике происходит каждые 710 команд специальная схема предсказатель переходов первая стадия конвейера должна за 1 такт сообразить сработает ли этот переход и если да то куда при том что данные для...