残念ながら、Pascal には 1 行からスペースで区切られた複数行を読み取る機能はありません。これを行うには、独自の関数を作成する必要があります。
<プレ>
vars、w: 文字列;
i、j、ind: 整数。
a: 文字列の配列。
始める
readln(s);
setlength(a, 長さ);
i := 1;
インド := 0;
一方、私は<長さは
始める
while (i < length(s)) および ('' + s[i] = ' ') は i += 1; となります。
j := i + 1;
w := '' + s[i];
while (j < length(s)) と ('' +s[j] <> ' ') は始まります
w += s[j];
j += 1;
終わり;
a[ind] := w;
ind += 1;
i := j;
終わり;
write(a[0], a[1]);
終わり。
その結果、文字列の配列が得られます。