На аптечном складе хранятся лекарства. Сведения о лекарствах содержатся в специальной ведомости: Наим. лекарства Кол-во Цена Срок хранения(в месяцах). Выяснить, сколько стоит самый дорогой и самый дешёвый препарат, сколько препаратов хранится на складе, какие препараты имеют срок хранения более 3 месяцев, сколько стоят все препараты — Pascal(Паскаль)

Read More

Как выполнить какой-то процесс тогда, когда пользователь не работает с моим приложением? — Delphi(Делфи)

Создайте процедуру, которая будет вызываться при событии Application.OnIdle. Объявим процедуру: В разделе implementation опишем поцедуру: В методе Form’ы OnCreate — укажем что наша процедура вызывается на событии Событие OnIdle возникает один раз — когда приложение переходит в режим «безделья» (idle). Если в обработчике переменной Done присвоить False событие будет вызываться вновь и вновь, до тех пор пока приложение «бездельничает» и переменной Done не присвоенно значение True.

Read More

Реализовать фоновую работу программы — Delphi(Делфи)

Попробуйте запустить программу. Пока компьютер ничего не делает, рисунок на окне все время меняется, но, стоит загрузить компьютер какой-либо работой, и изменение фона прекращается. В этой программе можно подвигать мышью по окну – это приведет к сравнительно сложным действиям, поэтому фоновая работа программы временно прекратится.

Read More

Реализация программы с использованием функций и процедур — Delphi(Делфи)

1.Конструирование формы: При выполнении задания на форме были размещены следующие компоненты: 2. Условие. Задана последовательность чисел А={A1,A2,…,A6}. Выбрать из них числа, принадлежащие отрезку [x,y]. Из выбранных чисел образовать массив. Решение оформить в виде подпрограммы. Исходные данные: А={-4.1,-1,1.2,3,5,0.75}. X=-2.5, Y=1.2. 3.Форма: 4. Программа. 5.Результат:

Read More

Реализация программы обработки матриц (двумерных массивов) — Delphi(Делфи))

1.Конструирование формы: При выполнении задания на форме были размещены следующие компоненты: 2.Условие: Определить наибольшее значение среди элементов, расположенных выше главной диагонали матрицы A(5,6). Напечатать новую матрицу A, в которой все элементы выше главной диагонали заменены нулями, кроме наибольшего элемента. Элементы исходной матрицы выбрать самостоятельно. 3.Форма: 4.Программа: 5.Результат:

Read More

Реализация программы обработки одномерных массивов — Delphi(Делфи)

1.Конструирование формы: При выполнении задания на форме были размещены следующие компоненты: 2.Условие: Дан массив xi={3,5;7,2;4,5;2,1;7,6;9,3}. Вычислить , найти max yi и его номер k. 3.Форма: 4.Программа: 5.Результат:

Read More

Реализация программы алгоритма линейной структуры — Delphi(Делфи)

1.Конструирование формы: При выполнении задания на форме были размещены следующие компоненты: Для перевода строковых данных в число использовалась функция StrToFloat. Для перевода результатов вычислений в строку была использована функция FormatFloat, позволяющая перевести число с плавающей запятой в требуемый формат в строковом виде. 2.Условие: Вычислить: y =   при а = 2.3*sin(t); b = 17.6*x3; t = 3; x = 1.38. 3.Форма 4. Программа: 5. Результат:

Read More