Подскажите, как правильно написать программу:
Условие: Найдите кол-во целых чисел, лежащих в интервале -100<=n<=100, при которых дробь
(n^2-5n+6)/(2n-1) является целым числом.

Вот алгоритм. На Паскаль самостоятельно перепишите. Требуемых чисел моя программа нашла 8.

Sub main()
Dim k As Integer, j As Integer, n As Integer
Dim y As Single

k = 0
For n = -100 To 100
y = (n * n - 5 * n + 6) / (2 * n - 1)
j = y
If (j = y) Then k = k + 1
Next n
Debug.Print "k="; k
End Sub