Условный оператор тут используют в старых версиях Паскаля, в которых не было реакции на ошибку деления на ноль. В современных версиях, например, PascalABC.NET не нужно делать никаких проверок.
Во вложениях 1 и 2 показано, что происходит при вводе значения х=15 в версии Free Pascal. В третьем вложении показана работа в PascalABC.NET 3.3
Во вложениях 1 и 2 показано, что происходит при вводе значения х=15 в версии Free Pascal.
В третьем вложении показана работа в PascalABC.NET 3.3