12 lines
125 B
ObjectPascal
12 lines
125 B
ObjectPascal
|
var
|
|||
|
|
A: record
|
|||
|
|
j: integer;
|
|||
|
|
jlocal0: record
|
|||
|
|
j: integer;
|
|||
|
|
i: real := j;
|
|||
|
|
end;
|
|||
|
|
end;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
|
|||
|
|
end.
|