Описать функцию Calc(A,B,Op) вещественного типа - VB

Формулировка задачи:

НЕмогу понять что требуется сделать в этой задаче,кто понял,напишите пожалуйста. Описать функцию Calc(A,B,Op) вещественного типа, выполняющую над не нулевыми вещественными числами А и В одну из арифметических операций и возвращающую ее результат .Вид операции определяется целым параметром Ор: 1-вычетание,2-умножение ,3-деление,остальные значение –сложения. С помощью Сalc выполнить для данных А и В операции ,определяемые данными целыми N1,N2 ,N3.

Решение задачи: «Описать функцию Calc(A,B,Op) вещественного типа»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Command1_Click()
Const N1 = 1
Const N2 = -1
Const N3 = 5.5
MsgBox ("- (N1;N2) " & calc(N1, N2, 1))
MsgBox ("* (N2;N3) " & calc(N2, N3, 2))
MsgBox ("/ (N1;N3) " & calc(N1, N3, 3))
MsgBox ("+ (N1;N2) " & calc(N1, N2, 0))
End Sub
Function calc(A, B, Op)
    Select Case Op
        Case 1
        calc = A - B
        Case 2
        calc = A * B
        Case 3
        calc = A / B
        Case Else
        calc = A + B
    End Select
End Function

Оцени полезность:

9 голосов , оценка 3.667 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы