Question

Помогите срочно!
Программирование. На MS Ofiice VBA Перевести пуды в фунты

Answer 1

Один пуд равен сорока русским фунтам, поэтому для перевода пудов в фунты достаточно умножить количество пудов на сорок.

Sub Pf()
    MsgBox CStr(40 * InputBox("Введите количество пудов")) + " фунт."
End Sub