Begin
LET : = []; {безліч літер, що зустрічаються в тексті}
Read ( C );
While C <> '.' do {цикл до кінця тексту}
Begin
if not (C in LET) then { перша входження < i>}
Begin
Write (C);
LET: = LET + [C]
end;
Read (C)
end;
Writeln;
end .
Висновок
У процесі виконання роботи ми ознайомилися:
- з описом типізованих файлів;
- з принципами роботи з файлами;
- зі створенням і відкриттям на запис нового файлу;
- з читанням з файлу;
- з відкриттям існуючого файлу на читання;
- з розпізнаванням кінця файлу;
- з визначенням імені файлу;
- із закриттям файлу;
- з описом текстових файлів;
- з читанням з текстових файлів;
- із записом у текстовий файл;
- з множинами та описом безлічі;
- з операціями над множинами;
- наведено безліч прикладів.
Література
1. Абрамов С.А., Зима Е.В. Почала програмування мовою Паскаль. - М.: Наука, 1987;
2. Абрамов С.А., Зима Е.В. Почала інформатики. - М.: Наука, 1988;
3. Довгаль С.І., Литвинов Б.Ю., Сбітнєв А.І. Персональні ЕОМ: Турбо-Паскаль V7.0, Об'єктне програмування, Локальні мережі. (Навчальний посібник). - Київ, В«Інформсистема сервіс В», 1993;
4. Епанешников А.М., Епанешников В.А. Програмування в середовищі Turbo-Pascal 7.0. - М.:, Діалог МІФІ, 1993;
5. Йенсен К., Вірт Н. Паскаль: Керівництво для користувача. /Пер. з англ. М.Л.Сальнікова, Ю.В.Сальніковой. - М.:, Комп'ютер, 1993;
6. Пермінов О.Н. Програмування на мові Паскаль. - М.: Радіо і зв'язок, 1988;
7. Поляков Д.Б., Круглов Н.Ю. Програмування в середовищі Турбо-Паскаля. - Ізд.МАІ., М.:, 1992;
8. Прайс Д. Програмування на мові Паскаль. Практичний посібник. /Пер. з англ. - М.:, Світ, 1987;
9. Семашко Г.Л., Салтиков А.І. Програмування на мові Паскаль. - М.: Наука. Гол. ред. фіз.-мат. літ., 1993;
10. Фаронов В.В. Турбо-Паскаль. Початковий курс - 1 кн. Практика програмування -2 кн. Навчальний посібник. - М.: В«НолиджВ», 1997;
11. Ербс Х.-Е., Штольц О. Введення в програмування на мові Паскаль./Пер. з нім. - М.:, Світ, 1989;
В
