RosettaCodeData/Task/Array-length/PascalABC.NET/array-length-1.pas

6 lines
128 B
ObjectPascal

// Array length. Nigel Galloway: September 2nd., 2022
var n:array of string:=('apple','orange');
begin
writeln(Length(n));
end.