СРОЧНО!В паскале) помогите пожалуйста) Надо ввести имя фамилию и отчество с клавиатуры затем сделать так чтобы программа вывела отдельно в строчку фамилию отдельно имя и отдельно отчество, а потом ещё и инициалы ОЧЕНЬ НАДО)

Program Nadya18081998; const n=20; var  f,i,o,ns:string; begin   write('Введите фамилию ');   readln(f);   write('Введите имя ');   readln(i);   write('Введите отчество ');   readln(o);   writeln('**********************************');   writeln(' Фамилия: ',f);   writeln('     Имя: ',i);   writeln('Отчество: ',o);   writeln('Инициалы: ',Copy(i,1,1)+Copy(o,1,1));   writeln('**********************************'); end.