98 , составьте алгоритм поиска кратчайших путей от заданной вершины , аналогичный разобранному в объяснительном тексте если граф задан списком ребер , 7 , решить с доскональным обьяснением , на обум решать не надо , зарание

построение проще под а) здесь можно построить с линейки и транспортера/

все мы знаем, что в современном интернете рядового пользователя подстерегает множество опасностей: часто злоумышленники пытаются взломать компьютер, украсть пароли доступа к сети или установить троянские программы.

объясняется это тем, что раньше только достаточно опытный и хорошо разбирающийся в применяемых в интернете технологиях человек мог совершить атаку на компьютеры, подключенные к сети. сейчас же любой, даже самый начинающий пользователь, прочитав пару книг определенной тематики, загрузив из сети несложное и небольшое программное обеспечение и возомнив себя опытным "хакером", может начать успешно посягать на целостность информации на компьютерах других пользователей сети, пытаться завладеть паролями для доступа в интернет, заниматься другой разрушительной

Program taska; var r1, r2: integer; procedure s(r1, r2: integer); var s: real; begin if r1 > r2 then s : = pi * (r1 * r1 - r2 * r2) else s : = pi * (r2 * r2 - r1 * r1); writeln('площадь кольца: ', s: 5: 2); end; begin write('r1 = '); readln(r1); write('r2 = '); readln(r2); s(r1, r2); readln; end.program taska; var r1, r2: integer; function s(r1, r2: integer): real; beginif r1 > r2 thenresult : = pi * (r1 * r1 - r2 * r2)elseresult : = pi * (r2 * r2 - r1 * r1); end; beginwrite('r1 = '); readln(r1); write('r2 = '); readln(r2); writeln('площадь кольца: ', s(r1, r2): 5: 2); end.