Ne yazık ki, Pascal'da boşluklarla ayrılmış birden çok satırı tek bir satırdan okumaya izin verecek bir işlev yoktur. Bunu yapmak için kendi fonksiyonunuzu yazmalısınız:
değişkenler, w: dizi;
i, j, ind: tamsayı;
a: dize dizisi;
başlamak
okuma(lar);
uzunluk(a, uzunluk(lar));
ben := 1;
sayı := 0;
ben
Sonuç olarak, bir dizi dizi elde ederiz.