Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Завдання. Метою лабораторної роботи є закріплення навичок обробки двовимірного масиву, ознайомлення з алгоритмами сортування елементів двовимірного масиву




Мета роботи

Метою лабораторної роботи є закріплення навичок обробки двовимірного масиву, ознайомлення з алгоритмами сортування елементів двовимірного масиву.

1. Скласти алгоритм і написати програму обробки двовимірного масиву. Здійснити введення двовимірного масиву з файлу даних, результати вивести в файл результатів, використовуючи при цьому форматний вивід. Варіанти завдань наведені у Додатку 12. Номер варіанта призначається викладачем.

2.Виконати налагодження програми та її тестування.

3. Скласти звіт про роботу.

Вказівки до виконання завдання

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

Для сортування елементів масиву використовуються цикли, а зміна розкладання елементів в масиві здійснюється за допомогою індексів. Способи сортування елементів двовимірного масиву наведено у прикладі.

Приклад. Дано масив цілих чисел А (20, 10).Визначити кількість елементів масиву, кратних 8 і вибудувати стовпці масиву за зростанням.

PROGRAM EXAMPLE

INTEGER A(20, 10), I, J, K, Z, M, N

OPEN(1, FILE=’A.DAT’, STATUS=’OLD’)

OPEN(2, FILE=’REZ.DAT’, STATUS=’NEW’)

READ(1, *) ((A(I, J), I=1, 20), J=1, 10)! зчитування елементів масиву

Z=0! початкове значення кількості кратних елементів

! Роздруківка початкових даних

WRITE(2, ‘(A)’) ‘Масив А’

DO 10 I = 1, 10

DO 20 J=1, 10

WRITE(2, ‘(I4\)’) A(I, J)

20 CONTINUE

WRITE(2, *)! перехід на інший рядок

10 CONTINUE

! Визначення кількості кратних елементів

DO 30 I = 1, 20

DO 40 J = 1, 10

M=A(I, J)/8

IF(M*8. EQ. A(I, J)) Z=Z+1

40 CONTINUE

30 CONTINUE

WRITE(2, 15) ‘Кількість елементів, кратних 8’, Z

15 FORMAT (2X, A, I4)

! Сортування масиву

DO 50 J=1, 10! першим відкривається цикл по стовпцям

DO 60 K=1, 20

DO 65 I=1, 19

IF (A(I, J).GT. A(I+1, J) THEN

N = A(I, J)! перестановка

A(I, J) = A(I+1, J)! елементів

A(I+1, J) = N! місцями

ENDIF

65 CONTINUE

60 CONTINUE

50 CONTINUE

! Роздруківка нового масиву

WRITE(2, ‘(A)’) ‘Новий масив’

DO 15 I = 1, 10

DO 25 J=1, 10

WRITE(2, ‘(I4\)’) A(I, J)

25 CONTINUE

WRITE(2, *)

15 CONTINUE

END

 

Коментарі до програми: при організації циклів в алгоритмах сортування першим буде цикл за індексом того елемента двовимірного масиву (рядка або стовпця), який заданий в умові. Наступним буде цикл, який дозволяє повторити порівняння сусідніх елементів стільки разів, скільки їх є в рядку або стовпці. Слід також звернути увагу, що останній цикл охоплює всі елементи, крім останнього. Це пов'язано з алгоритмом організації порівняння елементів.

 

Звіт про роботу повинен містити короткий опис роботи, алгоритм у вигляді блок-схеми, текст програми та результати її роботи.

 

Лабораторна робота № 12

ПІДПРОГРАМА SUBROUTINE І ЗАГАЛЬНІ БЛОКИ

 




Поделиться с друзьями:


Дата добавления: 2014-12-07; Просмотров: 334; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.013 сек.