Изучение Delphi. Графическая схема алгоритма

Страницы работы

8 страниц (Word-файл)

Содержание работы

Условие задачи: В каждой из задач данного раздела предполагается, что задана  матрица размером   n х m.  Программа должна:

1) вводить размерность и элементы матрицы;

2) вводить некоторые дополнительные числа;

3) выполнять действия в соответствии с условием задачи;

4) выводить исходные данные и результаты вычислений.

Исходные данные для отладки программы выбрать самостоятельно.

Вариант

Задание

5

Вычислить сумму элементов, меньших заданного В и расположенных в столбцах с номерами кратными 3

Исходные данные :

X(массив)

n (количество строк)

m (количество столбцов)

B (число)

Результат:

S (сумма)

Графическая схема алгоритма:

Начало,Ввод: n, m m

,0

,K = 0




,Ввод B 

, Вывод: В массиве нет таких элементов 



,1

,2

,1000

,Ввод массива X 

,3

,       S= 0




,4

,5

,i = 1




,6

,  i ≤ n,7

,j = 3




,8

,  j ≤ m,9

,S = S+ X[i,j]




,1100

,K = 1




,1200

,j = j+3




,1300

,i = i+1




,1400

,   K = 0

,1500

,1600

, Вывод: S



,1700

,1800

,Да

,Нет,Да

,Нет,Да

,Нет,Да

,Нет
 


 X[i,j] < B


Конец


Таблица переменных:

Имя в задаче

Имя в программе

Тип

Назначение

n

n

integer

Количество строк

m

m

integer

Количество столбцов

X

X

array[1..Max,1..Max] of real

Исходный массив

i

integer

Текущая строка

j

integer

Текущий столбец

K

integer

Переменная признака

Max

const

Верхняя граница массива

S

real

Сумма

B

B

real

Число

Проектирование формы:

Label1,Label2,Label3,Label4
Edit1,Button1

,Edit2,Edit3
Label5,StringGrid1


Таблица компонентов:

Элемент интерфейса

Визуальный компонент

Свойства

Значение свойства

Заголовок окна

Form1

Caption

РАБОТА С ДВУМЕРНЫМИ МАССИВАМИ

Метка для оформления ввода n

Label1

Caption

Ввести количество строк

Метка для оформления ввода m

Label2

Caption

Visible    False

Ввести количество столбцов

Метка для оформления ввода B

Label3

Caption

Visible    False

Ввести число B

Метка для оформления ввода матрицы

Label4

Caption

Visible    False

Ввести матрицу

Поле вывода S

Label5

Caption

Visible    False

Кнопка “Определить”

Button1

Caption

Visible    False

Определение

Поле ввода n

Edit1

Text

Visible    False

Поле ввода m

Edit2

Text

Visible    False

Поле ввода B

Edit3

Text

Visible    False

Поле ввода массива X

StringGrid1

Visible         False

FixedCols    1

FixedRows  1

ColCount     2

RowCount   2

Options:

goEditing  True

goTabs      True

Таблица используемых событий:

Визуальный компонент

Событие

Процедура обработки события

Реализуемый алгоритм

Button1

OnClick

TForm1.Button1Click

Вычисление суммы элементов, меньших заданного В и расположенных в столбцах с номерами кратными 3

Edit1

OnChange

TForm1.Edit1Change

Подгон  StringGrid1  под  количество строк

Edit2

OnChange

TForm1.Edit2Change

Подгон  StringGrid1  под  количество  столбцов

Edit3

OnChange

TForm1.Edit3Change

Присваивание  Button1.Visible,

Label4.Visible,

StringGrid1.Visible

значения True

Похожие материалы

Информация о работе