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


Полезное:

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


Категории:

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






Часть II





 

Решение типовых задач (разработка приложений) по заданной тематике.

Требования:

  1. Среда разработки – Visual BASIC 6.0.
  2. Представление решенной задачи – распечатанный программный код с комментариями и «скриншот» экранной формы с указанием имен объектов (значения свойства Name).
  3. Приложение должно иметь интерфейс, отвечающий содержанию задачи с необходимыми элементами управления (примеры см. в прилагаемой папке «Пособие для студентов» в соответствие с тематикой задач).
  4. К печатному варианту отчета по курсовой должен прилагаться электронный вариант разработанных приложений (проектов).
  5. Требование к программному коду:

· Программный код проекта должен иметь подробные комментарии.

· Инструкция Option Explicit должна быть включена в программный код.

· Участки кода, когда это целесообразно, должны быть оформлены в виде процедур или функций, размещенных в отельных модулях.

· Ввести в интерфейс приложения элементы управления, отображающие вводимую и выводимую информацию.

· Если в условии задачи не указаны элементы управления интерфейса приложения, то ее код должен быть записан следующим образом:

 

Постановка задачи. Определить путь, пройденный физическим телом, зная исходные время, скорость и ускорение.

Решение.

Option Explicit

Dim v As Integer

Dim t As Integer

Dim a As Integer

 

Function DefineS(x As Integer, y As Integer, z As Integer)

DefineS = x * y + z * y * y / 2

End Function

 

Sub InsertParam(param As String, x As Integer)

x = InputBox("Введите значение параметра " & param, "Ввод парамтров" & param)

End Sub

 

Private Sub cmd1_Click()

Print "Задача:"

Print "Определить путь, пройденный "

Print "физическим телом за время t с,"

Print "с начальной скоростью v м/c "

Print "и ускорением а м/c*c"

InsertParam "скорость", v

InsertParam "время", t

InsertParam "ускорение", a

Print ""

Print "Ответ:"

Print "Тело прошло путь"; DefineS(v, t, a); "метра"

End Sub

 

Номер варианта задания из Части II определяется порядковым номером фамилии

студента в журнале группы в соответствии с приведенной ниже таблицей.

 

Таблица определения номеров задач Части II

N п/п Задача 1 (Таблица 3) Задача 2 (Таблица 4) Задача 3 (Таблица 5) Задача 4 (Таблица 6) Задача 5 (Таблица 8)
1.
2.
3.
1.
1. 4.
2.
2. 5.
3.
3. 6. 1. 4.
4. 7. 2. 5.
5. 8. 3. 6.
1. 6. 9. 4. 7.
2. 7. 10. 5. 8.
3. 8. 1. 6. 9.
4. 9. 2. 7. 10.
5. 10. 3. 8. 11.
6. 11. 4. 9. 12.
7. 12. 5. 10. 1.

 

Date: 2015-09-02; view: 381; Нарушение авторских прав; Помощь в написании работы --> СЮДА...



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