Описать процедуру AddLeftDigit (D,K), добавляющую к целому положительному числу K слева цифру D - VB
Формулировка задачи:
Описать процедуру AddLeftDigit (D,K), добавляющую к целому положительному числу K слева цифру D (D-входной параметр целого типа, лежащий в диапазоне 0-9, K-параметр целого типа, являющийся одновременно входным и выходным). С помощью этой процедуры последовательно добавить к данному числу K слева цифры D1 и D2, выводя результат каждого добавления.
Решение задачи: «Описать процедуру AddLeftDigit (D,K), добавляющую к целому положительному числу K слева цифру D»
textual
Листинг программы
Function AddLeftDigit(N As long, d As long) As long AddLeftDigit=Val(Cstr(d) & Cstr(N)) End Function