Выберите номер пункта, соответствующий назначению каждой из программ

Program AA;
uses crt, dos;
var
 i : integer;
begin
 clrscr;
 for i:=3 to 70 do begin
	gotoxy(i-1,10); write(' ');
 gotoxy(i-1,11); write(' ');
 if i mod 2 = 0 then gotoxy(i,10)
 	else gotoxy(i,11);
 write('*');
 delay(500);
 end;
end.

Program AA;
uses crt, dos;
var
 DirInfo : SearchRec;
 f : file;
begin
 FindFirst('*.*',Archive,DirInfo);
 while DosError=0 do begin
 	assign(f,DirInfo.Name); erase(f);
 	FindNext(DirInfo);
 		end;
end.

1. Текстовый редактор
2. Графический редактор
3. Архиватор (сжатие)
4. Архиватор (разархивирование)
5. Электронная таблица
6. Игра "Перебежать по доскам"
7. Игра "Тир"
8. Объединение 2-х файлов
9. Разбиение файла
10. Поиск в текстовом файле
11. Программа очистки экрана дисплея
12. Резидентная программа очистки экрана дисплея
13. Игра "Гусеница — пожирательница цифр"
14. Сортировка файла чисел
15. Рисование спирали
16. Программа уничтожения всех файлов в текущем подкаталоге
17. Простейшая надстройка над ДОС
18. Программа рисования шахматной доски
19. Игра "Тараканьи бега"
20. Инвертирование цветов на экране дисплея в графическом режиме
21. Программа "Секундомер"
22. Программа "Бегущий человечек"
23. Программа "Подпрыгивающий символ"

Задачи предоставлены Александром ПРИХОДЬКО
Курсы-студия программирования, тел. 51-24-30