Нужно максимум напишите графическое приложение с использованием библиотеки swing, которое получало бы на входе адрес папки и расширения искомых файлов, рекурсивно сканировало бы заданную папку и подпапки на наличие файлов с заданным разрешением и выводило бы все найденные файлы в список из двух столбцов (имя файла и путь к нему таким образом, интерфейс программы должен содержать: 1) поле для адреса папки, в которой будем искать, с рядом расположенной кнопкой, позволяющей выбрать папку из файловой системы 2) поле для расширений файлов (через запятую) 3) кнопку пуск 4) список из двух столбцов для вывода результата

< {a,b,c,d},{u,v,w,x}; {(u,,,,,,,c), (x,d)}> . так как мы рассматриваем только простые графы, граф нам проще определять как модель, носителем которой является множество вершин, а отношение - бинарное отношение смежности вершин. тогда данный граф запишется как < {a,b,c,d}; {(a,b), (b,,,,,,,c)}> . в таком представлении ребру соответствуют две пары вершин (v1,v2) и (v2,v1), инцидентных данному ребру. чтобы задать такое представление, достаточно для каждого ребра указать двухэлементное множество вершин - его мы и будем отождествлять с ребром. для данного графа рёбра множеством {{a,b},{b,c},{a,c},{c,d}} и граф мы будем записывать как пару (v,e), где v - множество вершин, а e - множество рёбер.

Program abc; var a,b,c,t,z: integer; m,k,l: string; label 1,2,3,4; begin writeln ('введите число от 1-го до 100'); repeat read(a) until (a> =0)and(a< =100); b: =a div 10; c: =a mod 10; if a=100 then goto 2; if a=0 then goto 1; if (a> 9) and (a< 20) then goto 4; case b of 2: m: ='двадцать '; 3: m: ='тридцать '; 4: m: ='сорок '; 5: m: ='пятьдесят '; 6: m: ='шестдесят '; 7: m: ='семдесят '; 8: m: ='восемьдесят '; 9: m: ='девяносто '; end; case c of 1: k: ='один'; 2: k: ='два'; 3: k: ='три'; 4: k: ='четыре'; 5: k: ='пять'; 6: k: ='шесть'; 7: k: ='семь'; 8: k: ='восемь'; 9: k: ='девять'; end; writeln (m,k); goto 3; 2: writeln ('сто'); goto 3; 1: writeln ('ноль'); goto 3; 4: if a=10 then writeln ('десять'); if a=11 then writeln ('одиннадцать'); if a=12 then writeln ('двенадцать'); if a=13 then writeln ('тринадцать'); if a=14 then writeln ('четырнадцать'); if a=15 then writeln ('пятьнадцать'); if a=16 then writeln ('шестнадцать'); if a=17 then writeln ('семнадцать'); if a=18 then writeln ('восемнадцать'); if a=19 then writeln ('девятнадцать'); 3: end.