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

Методическое пособие 92

.pdf
Скачиваний:
2
Добавлен:
30.04.2022
Размер:
380.19 Кб
Скачать

if j1<>j2 then // перестановка столбцов, если j1 j2 for i:=1 to n do

begin

z:=a[i,j1]; a[i,j1]:=a[i,j2]; a[i,j2]:=z end;

writeln(f,'Матрица после перестановки:'); for i:=1 to n do // вывод матрицы-результата в файл begin

for j:=1 to n do write(f,a[i,j]:6,' ');

writeln(f)

end;

close(f) // закрытие файла

End.

Результаты работы:

Введите порядок матрицы n: 3 Введите элементы матрицы:

A[1,1]=1

A[1,2]=-5

A[1,3]=2

A[2,1]=2

A[2,2]=2

A[2,3]=9

A[3,1]=1

A[3,2]=1

A[3,3]=0

Исходная матрица:

 

1

-5

2

2

2

9

1

1

0

Матрица после перестановки:

1

2

-5

2

9

2

1

0

1

19

БИБЛИОГРАФИЧЕСКИЙ СПИСОК

1.Информатика. Базовый курс: Учеб. пособие для втузов

/Под ред. С.В. Симоновича. – 2-е изд. – СПб.: Питер, 2009. – 640 с.

2.Фаронов В.В. Турбо Паскаль 7.0: Учеб. пособие. СПб.:

Питер, 2007. – 367 с.

3.Примеры библиографического описания / Режим дос-

тупа: http://www.vorstu.ru/structura/library/ch_usl/1934/

СОДЕРЖАНИЕ

 

ВВЕДЕНИЕ

1

Задание к курсовой работе

2

Этапы выполнения курсовой работы

6

Приложение А. Образцы титульного листа и листа задания

15

Приложение Б. Пример решения практических заданий

17

БИБЛИОГРАФИЧЕСКИЙ СПИСОК

20

20

МЕТОДИЧЕСКИЕ УКАЗАНИЯ

к выполнению курсовой работы по дисциплинам «Информатика» и «Спецглавы информатики»

для студентов направлений 22.03.02 «Металлургия», 21.03.01 «Нефтегазовое дело» и 14.03.01 «Ядерная энергетика

и теплофизика» очной формы обучения

Составители Кострюков Сергей Александрович Пешков Вадим Вячеславович Шунин Геннадий Евгеньевич

В авторской редакции

Подписано к изданию 30.11.2015. Уч.-изд. л. 1,2

ФГБОУ ВО "Воронежский государственный технический университет"

394026 Воронеж, Московский просп., 14