|
zadach290.BAS |
|
{* Задача290 *}REM basic ' Заданно трехразрядное число а с двумя разрадам в дробной части. Определить есть ли в' этом числе цифра 8CLS
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
|