создать программу в паскале
ввода с клавиатуры анкетных данных (ФИО, дата рождения, место проживания, место работы) и их вывода в текстовый документ. То есть, программа поочередно предлагает ввести данные и после их ввода появляется текстовый файл с введенными данными

спосибо

program Anketa;var  st: String;  f: Text;begin   Assign(f,'anketa.txt');   Rewrite(f);   Write('Введите ваши ФИО: ');   Readln(st);   Writeln(f, 'ФИО: ',st);   Write('Введите вашу дату рождения: ');   Readln(st);   Writeln(f, 'Дата рождения: ',st);  Write('Введите ваше место проживания: ');   Readln(st);   Writeln(f, 'Адрес проживания: ',st);Write('Введите ваше метсо работы: ');   Readln(st);   Writeln(f, 'Место работы: ',st);   Close(f);   Writeln('Спасибо, ваши данные были сохранены успешно!');  Readln;end.