Главная Случайная страница


Полезное:

Как сделать разговор полезным и приятным Как сделать объемную звезду своими руками Как сделать то, что делать не хочется? Как сделать погремушку Как сделать так чтобы женщины сами знакомились с вами Как сделать идею коммерческой Как сделать хорошую растяжку ног? Как сделать наш разум здоровым? Как сделать, чтобы люди обманывали меньше Вопрос 4. Как сделать так, чтобы вас уважали и ценили? Как сделать лучше себе и другим людям Как сделать свидание интересным?


Категории:

АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника






Лабораторная работа №8





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

Цель работы:

· изучение типа данных “динамический массив”;

· получение навыков программирования обработки динамических массивов средствами Object Pascal.

Пример 8.1 Основные операции со структурой данных – динамический массив

Дано: динамический массив из “n” элементов целого типа. Разработать приложение, выполняющие следующие действия:

1. Формирование массива вводом элементов значений с клавиатуры.

2. Вычисление суммы положительных элементов массива.

3. Определение, сколько раз максимальный элемент встречается в массиве.

4. Формирование нового массива из элементов заданного, кратных числу “k”.

5. Упорядочение заданного массива по возрастанию.

6. Показ полученных результатов на форме Form2:

 

· суммы и максимального элемента в полях редактирования Edit;

· заданного массива, массива из кратных элементов, упорядоченного массива по возрастанию в списках строк ListBox;

 

Вид формы Form1 с компонентами:

 

 

Вид формы Form2 с компонентами:

 

Модуль формы Form1:







Date: 2015-07-25; view: 362; Нарушение авторских прав



mydocx.ru - 2015-2024 year. (0.006 sec.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав - Пожаловаться на публикацию