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