Вопрос по информатике:
Visual Basic
Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае:
Cумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр
- 08.10.2015 23:14
- Информатика
- remove_red_eye 13949
- thumb_up 39
Ответы и объяснения 1
'VBScript
Function FirstEqLast(number)
last = number mod 10 + (number \ 10) mod 10
f1 = 0
f2 = 0
do while number > 0
f2 = f1
f1 = number mod 10
number = number \ 10
loop
first = f1 + f2
FirstEqLast = (first = last)
End Function
msgbox FirstEqLast(32532)
- 09.10.2015 01:51
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.