Что делать? Program n1; Type Test = class Private Var a:integer:= 10; Public Var b:integer:= 15; End; Begin Var cl:Test := new Test(); Writeln(cl.a); // должно не выполняться но паскалю пофиг Writeln(cl.b) // выпонится End.
Что делать?
Program n1;
Type
Test = class
Private
Var a:integer:= 10;
Public
Var b:integer:= 15;
End;
Begin
Var cl:Test := new Test();
Writeln(cl.a); // должно не выполняться но паскалю пофиг
Writeln(cl.b) // выпонится
End.
Ответ(ы) на вопрос:
просто удали Var
............
Не нашли ответ?
Похожие вопросы