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

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

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

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

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

анализ;

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

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

История;

Философия.

Question

Информатика

Викторыч

11 июня, 01:56

Задание 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.