Вопрос по информатике:
Создать программу в паскале
ввода с клавиатуры анкетных данных (ФИО, дата рождения, место проживания, место работы) и их вывода в текстовый документ. То есть, программа поочередно предлагает ввести данные и после их ввода появляется текстовый файл с введенными данными
- 07.01.2018 10:32
- Информатика
- remove_red_eye 16554
- thumb_up 14
Ответы и объяснения 1
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.
- 08.01.2018 07:37
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.