/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/nullable8.pas
15 строк
225 B
Ivan Bondarev
#2527
10 окт 2021, 15:01
10 окт 2021, 15:01
05f94b9
Код
Авторство
О чём код?
type r1 = record end; begin var n1, n2: r1?; assert(n1 = n2); assert(n1 = nil); assert(not (n1<>n2)); n1 := new r1; assert(n1 = n1); n2 := new r1; assert(n1 = n2); n2 := nil; assert(n1 <> n2); end.