10 lines
129 B
ObjectPascal
10 lines
129 B
ObjectPascal
|
|
function RowSequence(bfbf: array [,] of integer): sequence of integer;
|
||
|
|
begin
|
||
|
|
var t := bfbf[0,0];
|
||
|
|
yield t;
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
|
||
|
|
|
||
|
|
end.
|