Функции преобразования типов данных

Дана программа:
Dim a as String
Dim b as String
Dim Z as ______
a="8"
b="9"
Z=a+b
Вопрос: чему будет равна переменная Z после выполнения этой программы и как ее объявить?
Рассмотрим программу более подробно:
Переменная а объявлена как текстовая
Переменная б объявлена как текстовая
Переменная Z является применением оператора "+" к двум текстовым переменным.
По отношению к текстовым переменным оператор "+" означает не "сумму", а "склеивание". Т.е. этот оператор соединяет два куска текста между собой. Например:
"66"+"77"="6677"
"Мышь"+"Клавиатура"+"Плоттер"="МышьКлавиатураПлоттер"
Таким образом, после выполнения данной программы переменная Z будет равна "89", и объявлять ее нужно как текстовую, т.е String.
Однако, предположим, что нам крайне необходимо именно сложить эти две переменные, а не склеить их. Что делать в таком случае?
На помощь нам придет первая функция преобразования. Ее название происходит от английского слова "value", что в переводе означает "значение". Эта функция служит для преобразования текста в число, при условии возможности этого преобразования.

Val(строка)

Ее название происходит от английского слова "value", что в переводе означает "значение". Эта функция служит для преобразования строки (текста) в число, при условии возможности этого преобразования. К примеру, при попытке вычислить val("Вася") программа выдаст ошибку.
Например:
Dim a as String
Dim b as String
Dim Z as Long
a="8"
b="9"
Z=val(a)+val(b)
Следует помнить, что аргументом этой функции является текст, а результатом вычисления функции - число.

Дана программа:
Dim a as Long
Dim b as Long
Dim Z as ______
a=8
b=9
Z=a+b
Вопрос: чему будет равна переменная Z после выполнения этой программы и как ее объявить?
В данном случае мы видим обратную ситуацию: идет сложение двух числовых переменных. А значит, результатом будет число, т.е. 17. И, соответственно, объявить переменную надо как Long
Что же делать, если у нас есть 2 числовые переменные, а нам необходимо склеить их значения, а не сложить? На помощь приходит другая строковая функция.

Str(число)

Ее название происходит от английского слова "string", т.е. "строка". Эта функция служит для преобразования числа в текст.
Например:
Dim a as Long
Dim b as Long
Dim Z as String
a=8
b=9
Z=Str(a)+Str(b)
Следует помнить, что аргументом этой функции является число, а результатом вычисления функции - текст.

Задание 1. Написать программу, вычисляющую сумму разрядов введенного пользователем трехзначного числа.

Dim a as Long
Dim b as String
Dim x1 as String
Dim x2 as String
Dim x3 as String
Dim y as Long
Примечание: Объявляем переменные. Переменная а - исходное, вводимое пользователем число.
Input a
Примечание: Вводим с клавиатуры нужное число
b=Str(a)
Примечание: Преобразуем значение переменной а в текст и запишем в переменную b
x1=Left(b,1)
x2=mid(b,2,1)
x3=Right(b,1)
Примечание: С помощью строковых функций скопируем в переменную х1 первый разряд числа, в переменную х2 - второй разряд числа, в переменную х3 - третий разряд числа.
y=val(x1)+val(x2)+val(x3)
Примечание: Преобразовываем каждый разряд в число и складываем их.
Print y