Вопрос по работе с объектами в Турбо Паскаль

[vete-7557]

Добрый день! Никто не подскажет почему в программе представленной ниже не выводится содержимое переменных N и P.

type
 poezdka=object
 N: integer; P: string;
procedure nomer;
procedure punkt;
end;
procedure poezdka.nomer;
begin
write('Введите номер поезда');
readln(N);
end;
procedure poezdka.punkt;
begin
write('Введите пункт назначения');
readln(P);
end;
var x: poezdka;
N:integer; P,D:string;
begin
x.nomer;
x.punkt;
writeln(N,P);
end.

[Stilet]

Может потому что ты не создал объект, а просто объявил его.
https://www.piter-press.ru/attachmen...295&at=exc&n=0

Создание объектов

объект;созданиеВ Турбо Паскале для создания объектов используются тризарезервированное слово;objectзарезервированное слово;constructorзарезервированное слово;destructor зарезервированных слова: object, constructor, destructor

Т.е.

x:=poezdka.create;
x.nomer;

writeln(N,P);

Это зачем?

[ViktorR]

В данном случае ошибка в том, что объявленные переменные и поля объекта совпадают.

type
 poezdka=object
 N: integer; P: string;  {поля объекта}
procedure nomer;
procedure punkt;
end;
...
var x: poezdka;
N:integer; P,D:string; {переменные программы}
...

В этом случае надо явно указать что выводится:

writeln(x.N, x.P); {вывод значений полей объекта}

Во вложении добавил расширенный пример ...

Вроде так, ...