{* Задача363 *}

REM basic

' Дано n-натуральное число. В данном числе все цифры(а) заменить нулем. N и a вводятся с клавиатуры.


CLS
INPUT "vvedite n,a"; n, a
Do
    If n Mod 10  a Then b = b + (n Mod 10) * 10 ^ k
    k = k + 1
    n = n  10
Loop Until n = 0
PRINT "b="; b
End