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

Предыдущий
вопрос Следующий
вопрос

Пример программы на Pascal:

program AnketData;
var
FIO, DOB, residence, workplace: string;
textFile: Text;
begin
// Ввод данных с клавиатуры
writeln('Введите ФИО:');
readln(FIO);
writeln('Введите дату рождения:');
readln(DOB);
writeln('Введите место проживания:');
readln(residence);
writeln('Введите место работы:');
readln(workplace);
// Запись данных в текстовый файл
AssignFile(textFile, 'anket_data.txt');
Rewrite(textFile);
writeln(textFile, 'ФИО: ', FIO);
writeln(textFile, 'Дата рождения: ', DOB);
writeln(textFile, 'Место проживания: ', residence);
writeln(textFile, 'Место работы: ', workplace);
CloseFile(textFile);
writeln('Данные успешно сохранены в файл anket_data.txt');
end.

После запуска программы пользователю будет предложено ввести данные анкеты: ФИО, дата рождения, место проживания и место работы. После ввода всех данных они будут сохранены в текстовый файл "anket_data.txt" в той же папке, где находится исполняемый файл программы.