Основы программирования
Определение формулы для функции Y(x), построение таблицы значений функции. Таблица свойств объектов. Блок-схема алгоритма и программные коды процедур. Программные коды для определения в массиве номера и значения 1-го элемента, равного заданной величине.
Рубрика | Программирование, компьютеры и кибернетика |
Вид | контрольная работа |
Язык | русский |
Дата добавления | 09.03.2012 |
Размер файла | 184,8 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Размещено на http://www.allbest.ru/
Задание № 1
1.Текст задания:
Определить формулу для функции Y(x). Построить таблицу значений функции.
Для произвольных значений интервала и шага изменения аргумента. Использовать оператор For-Next. Вывести на печать таблицу значений X и Y.
2.Таблица используемых переменных:
Переменная и ей тип |
Назначение переменной |
|
nach (Single) |
Начальное значение промежутка |
|
kon (Single) |
Конечное значение промежутка |
|
X (Single) |
Шаг |
|
fl (Integer) |
Переменная |
|
y (Single) |
Значение функции |
|
i (Single) |
Значение аргумента |
3.Эскиз формы:
программный код массив
4.Таблица свойств объектов:
Объект |
Свойство |
|
Text1 (TextBox) |
Ввод начального значения x c, которого начинается вычисление функции |
|
Text2 (TextBox) |
Ввод конечного значения x, на котором заканчивается вычисление функции |
|
Text3 (TextBox) |
Вводится шаг |
|
Command1 (CommandButton) |
Запуск вычисления функции |
|
Command2 (CommandButton) |
Выход из программы |
|
OLE1 (OLE) |
Объект, на котором показана счетная функция |
|
Picture1 (PictureBox) |
Выводится значения X |
|
Picture2 (PictureBox) |
Выводятся значений Y |
5.Блок-схема алгоритма:
Размещено на http://www.allbest.ru/
6.Программные коды процедур:
Dim nach As Single, kon As Single, x As Single, fl As Integer, i As Single, y As Single
Private Sub Command1_Click()
nach = Val(Text2.Text)
kon = Val(Text1.Text)
x = Val(Text3.Text)
fl = 1
If x = 0 Then GoTo 1
If (x > 0) And (nach > kon) Then GoTo 1
If (x < 0) And (nach < kon) Then GoTo 1
fl = 0
For i = nach To kon Step x
y = ((i ^ 2 + 1) ^ (1 / 3) * Cos(i) + Atn(3 * i) * Sqr(Abs(i))) / (Sin((5 / 9) * Atn(1) + i) + (1 / 3) * Sin(Log(Abs(Tan(i))) / Log(2)))
Picture1.Print (" "); i
Picture2.Print (" "); y
Next i
1: If fl = 1 Then
MsgBox "Неправильно введены данные!!!"
fl = 0
End If
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
7.Результаты вычисления:
Задание № 2
1.Текст задания:
Составьте программные коды для решения задачи: В массиве определить номер и значение 1-го элемента, равного заданной величине. Предусмотреть вывод сообщения для случая отсутствия элементов, удовлетворяющих условию списка.
2.Таблица используемых переменных:
Переменная и ей тип |
Назначение переменной |
|
mas() (Integer) |
Массив |
|
i (Integer) |
Переменная в операторе |
|
chislo (Integer) |
Заданная величина |
|
fl (Integer) |
Переменная |
|
po (Integer) |
Номер элемента в массиве |
3. Эскиз формы:
4. Таблица свойств объектов:
Объект |
Свойство |
|
Text2 (TextBox) |
Ввод заданной величины, которую надо найти в массиве |
|
Command2 (CommandButton) |
Запуск нахождения заданной величины |
|
Command1 (CommandButton) |
Выход из программы |
|
Picture2 (PictureBox) |
Вывод номера элемента который надо найти в массиве, в случае если такавого нет выводится сообщение об его отсутствии |
5)Блок-схема алгоритма:
Размещено на http://www.allbest.ru/
6.Программные коды процедур:
Dim mas() As Integer, i As Integer, chislo As Integer, po As Integer, fl As Integer
Private Sub Command1_Click()
Unload Me
End Sub
Private Sub Command2_Click()
fl = 0
chislo = Val(Text2.Text)
po = 0
Randomize
ReDim mas(10)
For i = 1 To 10
mas(i) = (Rnd(10) * 20)
Form1.Print (" "); mas(i)
Next i
For i = 1 To 10
If mas(i) = chislo Then
po = i
fl = 1
GoTo 1
End If
Next i
1: If fl = 1 Then
Picture2.Print (" "); po
Else: MsgBox "Такой элемент не найден!!!"
End If
End Sub
7.Результаты вычисления:
Поиск числа 2:
Размещено на Allbest.ru
Подобные документы
Табличный вывод значений суммы ряда и номера последнего элемента суммы в зависимости от значений величин входных параметров с применением операторов ветвления и циклов. Блок-схема алгоритма решения. Время работы программы для расчета одного значения.
контрольная работа [762,9 K], добавлен 14.05.2013Расчет и построение таблицы значений функции (протабулирование функции) при различных значениях аргумента. Нахождение наибольшего и наименьшего значений функции на отрезке и построение графика. Рабочий лист Excel в режимах отображения значений и формул.
контрольная работа [30,0 K], добавлен 27.05.2010Создание приложения для вычисления значений функций и определение суммы этих функций: эскиз формы, таблица свойств объекта, список идентификаторов и непосредственные коды процедур. Результаты вычислений и выводы, проверка работы данной программы.
лабораторная работа [19,9 K], добавлен 20.10.2009Вычисление значения интеграла функции, заданной графически. Постановка задач. Составление таблицы значений функции, заданной в виде разложения в ряд. Математическая формулировка. Численный метод решения. Схемы алгоритмов. Инструкции пользователям.
курсовая работа [56,3 K], добавлен 05.07.2008История создания и развитие языка программирования Pascal, его версии. Особенности и порядок построения графика функции на языке Turbo Pascal с использованием декартовой системы координат. Блок схема алгоритма процедур, листинг и тестирование программы.
курсовая работа [102,7 K], добавлен 23.12.2011Выбор и обоснование параметров варианта. Структура вычислительного процесса алгоритмы вычисления. Последовательность обработки операндов. Обозначения на схемах ОВС, временные диаграммы. Программирование ОВС, коды команд ОЭ. Схема цепей программирования.
курсовая работа [264,1 K], добавлен 24.09.2010Изучение понятия и свойств алгоритма. Определение сущности технологии Robson. Исполнитель, а также блок-схема алгоритма или его графическое представление, в котором он изображается в виде последовательности связанных между собой функциональных блоков.
реферат [155,9 K], добавлен 19.10.2013Разработка программного обеспечения, реализующего нахождение минимального значения заданной функции многих переменных и ее точку минимума методом сопряжённых градиентов. Минимизация функции вдоль заданного направления. Блок-схема алгоритма минимизации.
отчет по практике [725,6 K], добавлен 01.10.2013Схема электрической цепи (источник переменного тока, катушка индуктивности, конденсатор, набор резисторов и ключ). Вывод системы дифференциальных уравнений. Численное интегрирование (методы левых и средних прямоугольников). Блок-схемы и программные коды.
курсовая работа [1,7 M], добавлен 09.06.2012Решение задачи по методу Адамса. Блок-схема функции main. Блок-схема функции Adams. Листинг программы. Блок-схема функции MMinor. Блок-схема функции MatrixMultiply. Блок-схема функции Determinant. Результат решения задачи на ЭВМ.
курсовая работа [68,9 K], добавлен 16.04.2004