Помогите пожалуйста решить задачу по программированию.

[Алексей091]

Введено трехзначное число . если в записи числа встречается цифра 5, то записать число в зеркальном отображении.

[сфинкс]

'555.bas
n = 157
n$ = STR$(n): m = LEN(n$): f = 0
FOR i = 1 TO m
    IF MID$(n$, i, 1) = "5" THEN f = 1
NEXT
IF f = 0 THEN END
FOR i = m TO 1 STEP -1
    PRINT MID$(n$, i, 1);
NEXT
END