Разработать функцию пользователя для расчета общей стоимости товаров - VB
Формулировка задачи:
Здравствуйте! Помогите пожалуйста с созданием функции пользователя циклической структуры.
Разработать функцию пользователя для расчета общей стоимости товаров по формуле:
С=ƩКi*Цi,
где С-общая стоимость товаров,
Кi-количество i-го товара,
Цi-цена i-го товара.
пыталась сделать так. не работает.
подскажите, в чем ошибка? как исправить?
Решение задачи: «Разработать функцию пользователя для расчета общей стоимости товаров»
textual
Листинг программы
Public Function ОбщаяСтоимость(КоличествоТовара As Variant, ЦенаТовара As Variant) As Double Dim K, I As Integer Dim Cost As Double Rem Описываем переменные K = КоличествоТовара.Count Rem Определяем количество товара Cost = 0 For I = 1 To K Cost = Cost + КоличествоТовара(I) * ЦенаТовара(I) Next I ОбщаяСтоимость = Cost End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д