Как вывести данные из строки в файле в массив? В первой строке количество элементов, во второй сами элементы и число элементов можно менять. При изменении количества чисел в строке программа должна работать без изменения в коде.
гугли про динамические массивы
Так, возможно
========================
type
ard = array of integer;
var
A :ard;
num,i:integer;
f :text;
begin
assign(f,'C:\Users\YourName\Desktop\test.txt');
reset(f);
read(f,num); // считываем количество элементов из файла
writeln(num);
A := new integer[num+1]; // создаём динамический массив
for i := 1 to num do begin // считываем элементы из файла
read(f,A[i]);
writeln(A[i]);
end;
close(f);
end.
⇢