Separate names with a comma.
В лабе 8 по-хорошему должно быть так: Program PR8; Uses Crt; Const n=15; Var D:array [1..n] of integer; b,i:integer; begin...