Составить число из сумм соседних цифр по модулю 10 - VB
Формулировка задачи:
Пользователь вводит целое положительное число.
И программа составляет число из сумм соседних цифр по модулю 10.
Решение задачи: «Составить число из сумм соседних цифр по модулю 10»
textual
Листинг программы
Private Sub Command1_Click() MsgBox (Val(Text1.Text * 2)) Mod 10 End Sub