zadach290.BAS

{* Задача290 *}

REM basic

' Заданно трехразрядное число а с двумя разрадам в дробной части. Определить есть ли в
' этом числе цифра 8


CLS
INPUT a!
a = a! * 100
If a  10000 = 8 Or a  1000 Mod 10 = 8 Or a  100 Mod 10 = 8 Or a  10 Mod 10 = 8 Or a Mod 10 = 8 Then
PRINT "yes"
Else PRINT "no"
End If