profile
Опубликовано 6 лет назад по предмету Информатика от TLiK

Даны два числа. Найти среднее арифметическое кубов этих чисел и среднее геометрическое модулей этих чисел. Написать программу на VB

  1. Ответ
    Ответ дан Aillianna
    ' код на VBScript 5

    Sub Zadanie2110767(a,b)
        MsgBox "среднее арифметическое кубов = " & 0.5*(a^3+b^3)
        MsgBox "среднее геометрическое модулей = " & sqr(abs(a*b))
    End Sub



Самые новые вопросы