Вычислить значение выражения - VB (63234)

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

Помогите решить задачи.... Я в этом совсем 0.0....

Код к задаче: «Вычислить значение выражения - VB (63234)»

textual
D=98765
summ=0
For i=1 to len(D)
  summ= summ + mid(D,i,1)
Next i
msgbox summ

8   голосов, оценка 4.250 из 5


СОХРАНИТЬ ССЫЛКУ