Основные принципы решения задач с многомерными массивами в среде программирования Delphi

Тип работы:
Реферат
Предмет:
Общие и комплексные проблемы естественных и точных наук


Узнать стоимость

Детальная информация о работе

Выдержка из работы

5. Андреев А. А. Педагогика высшей школы. Новый курс. — М.: Московский международный институт эконометрики, информатики, финансов и права, 2002. — 264 с.
6. Burge E. Flexible Pedagogy, Flexible Practice — AU Press, 2011. — 348 p.
7. Online Distance Education. Edited by Anderson T. — AU Press, 2014. -507 p.
ОСНОВНЫЕ ПРИНЦИПЫ РЕШЕНИЯ ЗАДАЧ С МНОГОМЕРНЫМИ МАССИВАМИ В СРЕДЕ ПРОГРАММИРОВАНИЯ DELPHI
© Остапенко И. А. *
Севастопольский государственный университет, г. Севастополь
Решение основных задач многомерных массивов в среде программирования Delphi.
Ключевые слова массив, среда Delphi, компонент StringGrid.
Одной из многих задач при изучении среды программирования Delphi есть формирование основных навыков работы с массивами. Исходя из этого, давайте рассмотрим основные задачи, которые используются при изучении массивов.
Массив — это упорядоченная совокупность однотипных данных, с каждым из которых связан упорядоченный набор целых чисел, называемых индексами. Массив характеризуется именем, размерностью и размером.
Имя массива образуется по общему правилу образования имен, т. е. представляет собой идентификатор, однако оно не должно совпадать с именем ни одной простой переменной, которая будет использоваться в программе.
Таким образом, для обращения к конкретному элементу массива необходимо указать имя массива и значения индексов [1].
Работа с массивом сводится к действиям над его элементами.
Для записи и хранения элементов массива в памяти компьютера нужно выделить необходимое количество (массив) ячеек памяти, которое определяется размером массива. Размеры массива задаются границами изменения индексов по каждому измерению (минимальное и максимальное значение индекса).
В среде Delphi для ввода и вывода массивов используется компонент StringGrid, поэтому работа с массивами в Delphi сильно отличается от работы в Pascal.
* Преподаватель, магистр.
Компонент StringGrid группы Additional представляет собой таблицу, которая содержит строки. Таблица может иметь полосы прокрутки, причем заданное число первых строк и столбцов может быть фиксированным и не подвергаться прокрутке. Таким образом, можно задать заголовки столбцов и строк, постоянно присутствующих в окне компонента. Каждой ячейке таблицы может быть поставлен в соответствии некоторый объект [2].
К стандартным задачам с многомерными массивами относятся задачи на вычисление суммы, произведения, количества, среднего арифметического, максимума, минимума элементов каждой строки или каждого столбца, заданной строки или заданного столбца, работа с диагональными элементами, строками.
Решение подобного рода заданий осуществляются при помощи вложенных циклов и вычислений в пределах массива.
Для примера рассмотрим задачу, в которой собранны все стандартные задания при работе с многомерными массивами.
Заполнить массив 5 на 5 и найти:
— сумму всех элементов-
— поменять вторую строку с третьей-
— поставить везде нули, кроме главной диагонали-
— заполнить главную диагональ нулями-
— найти числа которые кратны трем-
— каждый элемент массива увеличить в три раза.
Решение:
Создаем форму
Рис. 1
Программа для реализации задачи может выглядеть так:
unit Unit2-
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids- type
TForm1 = class (TForm) StringGrid1: TStringGrid- Button1: TButton- Button2: TButton- Button3: TButton- Edit1: TEdit- Button4: TButton- Button5: TButton- Button6: TButton- Button7: TButton- Label1: TLabel-
procedure Button1Click (Sender: TObject) — procedure Button2Click (Sender: TObject) — procedure Button3Click (Sender: TObject) — procedure Button4Click (Sender: TObject) — procedure Button6Click (Sender: TObject) — procedure Button7Click (Sender: TObject) — procedure Button5Click (Sender: TObject) — private
{Private declarations} public
{Public declarations} end- var
Form1: TForm1- implementation {$R *. dfm}
Создаем массив и заполняем его случайными числами
procedure TForm1. Button1Click (Sender: TObject) —
var i, j: byte-
begin
randomize-
for i: =0 to stringgridLColCount-1 do begin for j: =0 to stringgridLRowCount-1 do begin
stringgrid1. Cells[j, i]: =inttostr (random (50)+1) — end- end- end-
Вычисление суммы всех элементов
procedure TForm1. Button2Click (Sender: TObject) —
var i, j: byte-
s: integer-
begin
s: =0-
for i: =0 to 4 do begin for j: =0 to 4 do begin s: =s+strtoint (stringgrid1. Cells[j, i]) — end- end-
edit1. Text:=inttostr (s) — end-
Замена второй строки третьей
procedure TForm1. Button3Click (Sender: TObject) — var i: byte-
a: array [0. 4] of integer- begin
for i: =0 to 4 do a[i]: =strtoint (stringgrid1. Cells[i, 1]) — for i: =0 to 4 do begin
stringgrid1. Cells[i, 1]: =stringgrid1. Cells[i, 2]- end-
for i: =0 to 4 do begin stringgrid1. Cells[i, 2]: =inttostr (a[i]) — end- end-
Замена всех элементов нулями, кроме главной диагонали
procedure TForm1. Button4Click (Sender: TObject) —
var i, j: byte-
begin
for i: =0 to stringgrid1. ColCount-1 do begin for j: =0 to stringgrid1. RowCount-1 do begin if (not (i=j)) then stringgrid1. Cells[j, i]:='-0'-- end- end- end-
Замена главной диагонали нулями
procedure TForm1. Button6Click (Sender: TObject) —
var i: byte- begin
for i: =0 to stringgrid1. ColCount-1 do begin
stringgrid1. Cells[i, i]: ='-0'--
end-
end-
Каждый элемент массива увеличиваем в три раза
procedure TForm1. Button7Click (Sender: TObject) — var i, j: byte- begin
for i: =0 to 4 do begin
for j: =0 to 4 do begin stringgrid 1. Cells [j, i]: =inttostr (strtoint (stringgrid1. Cells[j, i])*3) — end- end- end-
Ищем числа которые кратны трем
procedure TForm1. Button5Click (Sender: TObject) —
var i, j: byte- begin
for i: =0 to 4 do begin
for j: =0 to 4 do begin if (((strtoint (stringgrid 1. Cells[j, i]) mod 3)=0)) then stringgrid1. Cells[j, i]:='-Хороший элемент!'- end- end- end- end.
В заключение отметим, что при работе с многомерными массивами, можно решить множество задач с матрицами. В ходе изучения массивов и примера задачи можно вывести простейшие алгоритмы по решению заданий. Мы убедились в широких возможностях среды программирования Delphi, в его практических возможностях и свойствах, особенно в работе с многомерными массивами.
Список литературы:
1. Использование массивов при обработке больших объемов информации [Электронный ресурс] // 5fan. ru — уникальная база студен-
ческих работ. — Режим доступа: http: //5fan. ru/wievjob. php? id=4752 (дата обращения: 02. 04. 2016).
2. Карчевская М. П., Рамбургер О. Л. и др. Разработка приложений в среде Borland Delphi. Лабораторный практикум по дисциплине «Информатика» // Электронный лабораторный практикум по Delphi. — Уфимский государственный авиационный технический университет, 2005.
КОМПЬЮТЕРНЫЕ ТЕХНОЛОГИИ В ПРЕПОДАВАНИИ ИНОСТРАННОГО ЯЗЫКА
© Охотникова Л. В. *
Челябинский государственный университет, г. Челябинск
В статье раскрывается использование современных информационных технологий в образовательном процессе. Описываются подходы к использованию интернет-технологий, приводится своё понимание преимущества данных технологий, подтверждённое практикой преподавания в вузе.
Ключевые слова технология, интернет, система Moodle, образовательный процесс.
Технология при переводе с греческого ^есЬпе) означает искусство, мастерство, умение, а это не что иное, как процессы.
Информационная технология — процесс, использующий совокупность методов сбора, обработки и передачи данных (первичной информации) для получения информации нового качества о состоянии объекта, процесса или явления (информационного продукта).
Сегодня при условии всемирной глобализации развитие информационной технологии приводит к образованию нового способа использования интернет технологий. В настоящее время в мире можно наблюдать последовательное и устойчивое движение при построении информационного общества, которое призвано создать наилучшее условие для максимальной самореализации каждого человека. Основания для такого процесса выражаются в интенсивном развитии компьютерной и телекоммуникационной технологии и создании развитой информационно-образовательной среды.
В современном обществе основным техническим средством технологии переработки информации служит персональный компьютер. Внедрение персонального компьютера в информационную сферу и применение телекоммуникационных средств связи определили новый этап развития информационной технологии.
* Старший преподаватель кафедры Делового иностранного языка.

ПоказатьСвернуть
Заполнить форму текущей работой