type Person = auto class name: string; age: integer; end; type Student = class(Person); begin var b1 := new Student('asd', 30) is Person(var c); writeln(c); var b2 := 1 is integer(var d); writeln(d); var arr := Arr(1, 3, 5, 7, 9); var l := new List(arr); var b4 := l is List(var f); writeln(f); var delegate: Func := PABCSystem.ChrUnicode; var b5 := delegate is Func(var g); writeln(g); end.