Как найти дискриминант в Паскале?

Вот что значит, древнегреческая херабора. Основной канал: @mmashiroo