Turbo Pascal Учебник по информатике

новости дня
Машиностроительное черчение
Выполнение сечений
Правила выполнения технических чертежей
Виды аксонометpических пpоекций
Эскиз детали
Нанесение размеров на чертежах
Чтение сборочных чертежей
Основные способы проецирования
Сопротивление материалов
Сопромат задачи
Сопротивление материалов примеры
Кинематика примеры решения задач
Статика примеры решения задач
Физика, электротехника
Электротехника
Электромагнетизм
Расчет режимов трехфазных цепей
Расчет электрических цепей постоянного и переменного тока
Методы расчета электрических цепей
Примеры  решения типовых задач по электротехнике
Физика оптика Курс лекций
Примеры решения задач по классической физике
Примеры решения задач контрольной работы по физике
Физика решение задач
Молекулярная физика и термодинамика
Курс лекций по атомной физике
Ядерная модель атома
Квантовая механика
Рентгеновские спектры
Первый газовый лазер
Металлы, диэлектрики и полупроводники по зонной теории.
Полупроводниковые диоды и триоды (транзисторы)
Радиоактивное излучение и его виды
Ядерные реакция

Понятие о ядерной энергетике

Информатика
Лекции Java
Язык JavaScript
Интернет
Язык PHP
Архитектура ПК
Высшая математика
Вычисление интегралов и рядов
Примеры вычисления интеграла
Примеры выполнения контрольной работы по математике
комплексные числа
Последовательности
Предел функции
Непрерывные функции
Дифференциальное исчисление
Формула Тейлора
Определенныеинтегралы
Двойной интеграл
Тройные интеграл
Криволинейные интегралы
Элементы теории поля
Интегралы от параметра
Элементы тензорного
исчисления
Примеры решения задач
Теория множеств
Построения графика функции
Элементарная математика
Интегралы
Кратные интегралы
Векторный анализ
Аналитическая геометрия
Интегральное исчисление
Дифферинциальные урав.
Элементарная математика
Математический анализ
Мат. анализа часть 3
Комплексные числа
 

Вводная часть

Глава 1. Основные понятия системы программирования Турбо Паскаль

Алфавит и словарь языка Паскаль

Величины в Паскале

Структура программы

Типы данных

Целочисленные типы данных

Вещественные типы данных

Символьный тип

Логический тип

Арифметические операции и стандартные функции

Ввод и вывод данных

Ввод данных с клавиатуры

Вывод данных

Глава 2. Операторы языка Паскаль

Общие сведения

Оператор присваивания

Оператор вызова процедуры

Оператор безусловного перехода

Пустой оператор

Структурные операторы

Составной оператор

Условные операторы

Операторы повтора (цикла)

Глава 3. Процедуры и функции

Стандартные библиотечные модули

Процедуры

Функции

Сетевые ОС

Глава 4. Массивы

Одномерные массивы

Двумерные массивы

Глава 5. Строковые величины

Символьные величины

Строковые величины

Глава 6. Графика в системе Турбо Паскаль

Общие сведения

Базовые процедуры и функции

Экран и окно в графическом режиме

Вывод простейших фигур

Построение многоугольников

Построение дуг и окружностей

Работа с текстом

Построение графиков функций

Циклы в графике. Моделирование случайных процессов

Создание иллюзии движения Литература

Практическая работа № 10

Тема: «Двумерные массивы. Преобразование и построение матриц»

Двумерные массивы являются аналогами матриц. Первый индекс элемента двумерного массива определяет номер строки, а второй – номер столбца, на пересечении, которых расположен элемент. Строки и столбцы нумеруются либо от единого заранее установленного минимального значения индекса, либо от граничного значения, заданного одновременно с объявлением массива.

Для задания значений двухмерного массива можно воспользоваться процедурой с использованием датчика случайных чисел, данной в лабораторной работе №8 .

Например:

Program Array_Full;

Const n=10;

Type mas = array [1..n, 1..n] of Integer;

Var m:mas;

Procedure Enter (Var tabl: mas);

Var i, j: Integer;

 Begin

 For i:= 1 to n do

 For j:= 1 to n do

 tabl[i,j]:=Random(10);

 End;

Begin

 Randomize;

 Enter (m);

End.

С помощью процедуры Enter осуществляется ввод двумерного массива размерностью 10´10 случайными числами из диапазона от 0 до 10. Задание диапазона значений определяется константой n=10.

Описание двухмерного массива производится следующим образом:

Const

 n=<ранг матрицы>;

Type

 matr=array [1..n,1..n] of <тип элементов матрицы>;

Var

 <имя матрицы>: matr;

Примеры решений задач

1. Процедура ввода матрицы.

Procedure Enter;

 Var

 ii, jj: integer;

 Begin

 For jj:=1 to n do

 For ii:=1 ot n do

 write('g[',ii,',',jj,']=>');readln (g[ii,jj]); 

 End;

2. Процедура вывода матрицы на экран. (В данной процедуре используется процедура GotoXY, содержащаяся в модуле CRT. Поэтому необходимо при использовании этой процедуры указать имя библиотеки CRT в разделе описания библиотек Uses)

Program Name_Program;

Uses Crt;

. . .

Procedure List;

 Var

 ii, jj: integer;

 Begin

 For jj:=1 to n do

 For ii:=1 to n do begin

 gotoxy(3*ii, jj); 

 write (g[ii,jj]); 

 end; 

 End; 

Список задач

Даны действительная матрица размера n´(n+1), действительные числа A1,...,An+1, B1, ..., Bn+1, натуральные числа p,q (p<=n, q<=n+1). Образовать новую матрицу размера (n+1)x(n+2) вставкой после строки с номером p данной матрицы новой строки с элементами A1, ..., An+1, и последующей вставкой после столбца с номером q нового столбца с элементами B1, ..., Bn+1.

Даны целые числа A1, ..., A10, целочисленная квадратная матрица порядка n. Заменить нулями в матрице те элементы с четной суммой индексов, для которых имеются равные среди A1, ..., A10.

Даны действительные числа A1, ..., An, действительная квадратная матрица порядка n (n>=6). Получить действительную матрицу размера n´(n+1), вставив в исходную матрицу между пятым и шестым столбцами новый столбец с элементами A1, ..., An.

Дана целочисленная матрица размера 6х9. Найти матрицу, получающуюся из данной:

а) перестановкой столбцов - первого и последнего, второй с пред­послед­ним и т.д.;

б) перестановкой строк - первого и последнего, второй с предпоследним и т.д.;

Дана действительная матрица [Aij], i, j=1, ..., n. Получить действительную матрицу [Bij], i, j=1, ..., n, элемент Bij который равен сумме элементов данной матрицы, расположенных в области, определяемой индексами i,j так, как показано на рис. (область заштрихована).

а) б) в) г)

Сходным образом можно рассмотреть вместо суммы элементов их произведение, наибольшее значение, наименьшее значение.

Дана действительная квадратная матрица порядка n. Преобразовать матрицу по правилу: строку с номером n сделать столбцом с номером n, столбец с номером n сделать строкой с номером n.

Даны две действительные квадратные матрицы порядка n. Получить новую матрицу:

а) умножением элементов каждой строки 1-й матрицы на наибольшее из значений элементов соответствующей второй матрицы;

б) прибавлением к элементам каждого столбца 1-й матрицы произведения элементов соответствующих строк второй матрицы.

В данной действительной матрице mxn (n>=3, m>=3) поменять местами:

а) строки с номерами 2 и n-1;

б) столбцы с номерами 3 и n-2.

Даны целочисленная матрица nx3, целые числа k, l (1<=k<=n, 1<=l<=n, k<>l).Преобразовать матрицу так, чтобы строка с исходным номером k непосредственно следовала за строкой с исходным номером l, сохранив порядок следования остальных строк.

В данной действительной квадратной матрице порядка n найти наибольший по модулю элемент. Получить квадратную матрицу порядка n-1 путем выбрасывания из исходной матрицы какой-нибудь строки и столбца, на пересечении которых расположен элемент с найденным значением.

Дана действительная квадратная матрица порядка n, все элементы которой различны. Найти наибольший элемент среди стоящих на главной и побочной диагоналях и поменять его местами с элементом, стоящим на пересечении этих диагоналей.

Построить квадратную матрицу порядка 2n.

 

Дано действительное число х. Получить квадратную матрицу порядка n=10. Середина заполняется нулями.

 

Даны действительные числа A1, ..., An. Получить квадратную матрицу порядка n.

 

Получить целочисленную квадратную матрицу порядка 7, элементами которой являются числа 1, 2, ..., 49, расположенные в ней по спирали.

 

Дана действительная квадратная матрица порядка 7. Найти последова­тельность действительных чисел B1, ..., B49, получающихся при чтении данной матрицы по спирали (см. предыдущую задачу).

Дана действительная квадратная матрица порядка 2n. Получить новую матрицу, переставляя ее блоки размера n´n, и соответствии с рис а) или б).

Получить квадратную матрицу порядка n;

 a) б) в) 

 г) д
)

 е) ж) з)

 и)к) л)

 м) н)

 

Высшая математика Лекции, конспекты, курсовые, примеры решения задач