Тренировочный вариант ЕГЭ по информатике №9

DIM S, T AS INTEGER
S = 1 : T = 5
WHILE S MOD T <> 4
  S = S + 2
  T = T + 1
WEND
PRINT S + T

SUB F(n)
  IF n <= 8 THEN
    F(n + 3)
  END IF
  IF n < 10 THEN
    PRINT N
  END IF
  IF n <= 5 THEN
    F(n + 4)
  END IF
END SUB

s = -1
FOR i = 0 TO 8
  IF A[i] > A[i + 1] THEN
    A[i + 1] = A[i + 1] - A[i]
    s = s + A[i]
  ELSE
    A[i + 1] = A[i + 1] + A[i]
    s = s - A[i]
  END IF
NEXT i

DIM X, A, B AS INTEGER
A = 0 : B = 0
INPUT(X)
WHILE X > 5
  IF X MOD 5 < 2 THEN
    A = A + 1
  END IF
  IF X MOD 5 > 2 THEN
    B = B + 1
  END IF
  X = X \ 5
WEND
PRINT A, B

DIM A, B, M, R, T AS INTEGER
A = -10 : B = 10
M = A : R = F(A)
FOR T = A TO B
  IF F(T + 1) <= R THEN
    M = T : R = F(T)
  END IF
NEXT T
PRINT M - R

FUNCTION F(x)
  F = abs(9 - (x - 3) * (x - 3)) - 2
END FUNCTION

n = int(input())
cnt = 0
p = 1
while n >= 1:
    digit = n % 10
    if digit % 2 == 1:
        cnt += 1
        p *= digit
    n //= 10
if p > 1:
    print(cnt)
else:
    print('NO')

CONST N AS INTEGER = 30
DIM A (1 TO N) AS LONG
DIM I AS LONG, J AS LONG, K AS LONG
FOR I = 1 TO N
  INPUT A(I)
NEXT I
...
END