Задание 4. Студентам была предложена анкета о том, знание каких из прочитанных

курсов могут потребоваться в будущей работе. Результаты анкетирования были

занесены в файл. Напишите программу создания файла анкетирования. Список

прочитанных курсов:

Математический

анализ;

Алгебра и геометрия;

Информатика;

История;

Философия.

Question

Информатика

Романыч

23 сентября, 09:05

Задание 4. Студентам была предложена анкета о том, знание каких из прочитанных

курсов могут потребоваться в будущей работе. Результаты анкетирования были

занесены в файл. Напишите программу создания файла анкетирования. Список

прочитанных курсов:

Математический

анализ;

Алгебра и геометрия;

Информатика;

История;

Философия.

+5

Ответы (1)

Знаете ответ на вопрос?

Ленуся · Answer 1

Const

c1='Математический анализ';

c2='Алгебра и геометрия';

c3='Информатика';

c4='История';

c5='Философия';

var

o: text;

begin

AssignFile (o, 'Output. dat') ;

Rewrite (o) ;

write (o, c1,'|', c2,'|', c3,'|', c4,'|', c5) ;

CloseFile (o)

end.