Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Kudesnikred
0 / 0 / 0
Регистрация: 25.01.2016
Сообщений: 4
#1

Вычисление значения выражения с использованием функций и процедур

25.01.2016, 01:47. Просмотров 890. Ответов 4
Метки нет (Все метки)

Ребята зачет горит!

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

P.S.: предмет не основной, поэтому я в нем ни в зуб ногой, а преподаватель лютует((
Если есть возможность помогите!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.01.2016, 01:47
Ответы с готовыми решениями:

Вычисление значения выражения по формулам
в visual basic составить программу для вычисления P, T, z z=\begin{cases}&...

С использованием оператора цикла For вычислить значения выражения
С использованием оператора цикла For вычислить значения выражения. x—...

Вычисление значения выражения при заданном значении х
Вычисление значения выражения при заданном значении x ...

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

Как получить список функций и процедур в большом проекте?
Privet, U minja est bolshoj projek napisno s pomshju visual basic 6 , xochu...

4
SoftIce
25.01.2016, 04:16
  #2

Не по теме:

Какой зачет в 2 часа ночи?

0
Kudesnikred
0 / 0 / 0
Регистрация: 25.01.2016
Сообщений: 4
25.01.2016, 12:30  [ТС] #3
Зачет вечером,на подготовку всего часов 10,вот и готовлюсь с ночи
0
fever brain
oh my god
1120 / 594 / 115
Регистрация: 05.01.2016
Сообщений: 1,834
Записей в блоге: 7
25.01.2016, 14:28 #4
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Простая функция X , возвращает значение 100 * Y

Visual Basic
1
2
3
4
5
6
7
Option Explicit
Function x(y)
    x = 100 * y
End Function
Private Sub Form_Activate()
    Me.Print x(InputBox("Введите число y"))
End Sub
Добавлено через 13 минут
Вот еще, (в этом примере нет других переменных кроме функций)
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
Function Z(X, Y) 'Получаем X * Y
    Z = X * Y
End Function
Function X() 'Получаем X
    Tag = "": Do Until IsNumeric(Tag): Tag = InputBox("Введите число X"): Loop: X = Tag
End Function
Function Y() 'Получаем Y
    Tag = "": Do Until IsNumeric(Tag): Tag = InputBox("Введите число Y"): Loop: Y = Tag
End Function
Private Sub Form_Activate() 'Процедура активации формы (запускается когда только появилось)
    Print Z(X, Y)
End Sub
Добавлено через 10 минут
Похоже студент не успел, хотя кто знает может еще не поздно по его времени ..
0
Kudesnikred
0 / 0 / 0
Регистрация: 25.01.2016
Сообщений: 4
25.01.2016, 19:31  [ТС] #5
спасибо огромное!
0
25.01.2016, 19:31
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.01.2016, 19:31

Add-in для VB6, который показывал дерево из всех функций и процедур
Как-то очень давно у меня был add-in для VB6, который показывал дерево из всех...

Программирование функций, Программирование процедур, рекурсивную подпрограммa
1 (Программирование функций) Вычислить площадь правильного шестиугольника со...

Многоугольник с использованием Api функций
Как нарисовать многоугольник с помощью мышки с использованием API Функций ???


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru