6 lines
128 B
ObjectPascal
6 lines
128 B
ObjectPascal
// При обычном делении на 0 ошибки не возникает
|
|
var r: real := 0;
|
|
|
|
begin
|
|
write(1/0);
|
|
end. |