Как сделать так чтобы все значения массива считывались из одной строки. паскаль

Question

Как сделать так чтобы все значения массива считывались из одной строки. паскаль

Comments

Разделить из, какой именно паскаль и какой тип данных в массиве? Байты, символы, строки?

---

free pascal 2.6.0 тип байты

---

То есть, Вам нужно считать коды символов строки в массив, так?

---

Мне даны числовые значении через пробел. Мне нужно чтобы каждое значение записалась в массив.

Answer 1

var
  str, str1: string;
  arr: array [1..256] of byte;
  i, i2: byte;
  err: integer;

begin
  readln(str);
  
  str := concat(str, ' ');
  for i := 1 to length(str) do
  begin
    if (str[i] = ' ') then
    begin
      i2 := i2 + 1;
      val(str1, arr[i2], err);
      str1 := '';
    end
    else
      str1 := concat(str1, str[i]);
  end;
    
  for i := 1 to length(str) do
    write(arr[i]:4);
end.