/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/errors/err0430.pas
20 строк
370 B
Ivan Bondarev
#2533
17 окт 2021, 13:04
17 окт 2021, 13:04
5548def
Код
Авторство
О чём код?
//!Класс t1 абстрактный и не может иметь атрибут sealed, потому что метод p1 не реализован unit err0430; interface type t0 = partial abstract class end; t1 = sealed class(t0) end; t0 = partial abstract class procedure p1; abstract; end; implementation begin new t1; end.