Program Ainur59; uses crt; const n=10; var i,j:integer; matr:array[1..n,1..n] of integer; diag:array[1..n] of integer; begin writeln('*** Alphaeus is thinking... ***'); writeln('*** OK ***'); writeln('Для заданной квадратной матрицы сформировать одномерный массив из её диагональных элементов'); randomize; writeln('Матрица: '); for i:=1 to n do begin for j:=1 to n do begin matr[i,j]:=random(100)-50; write(matr[i,j]:4,' '); if i=j then diag[i]:=matr[i,j]; end; writeln(); end; writeln(); writeln('Mассив диагональных элементов:'); for i:=1 to n do write(diag[i]:4,' '); end.
Если сервер выходит из строя, то пользователю становится недоступной лишь та информация, которая хранилась на этом сервере, а так же может выйти из строя сеть, управляемая этим сервером. Интернет же представляет собой огромное количество сетей, использующих разные типы линий связи, принадлежащие разным провайдерам, управляемые разными серверами, связанные воедино хитроумной паутиной топологии. Если какая то сеть выходит из строя, маршрутизаторы ищут и используют другие пути для доставки сообщений. На магистральных (междугородних) линиях связи обязательно присутствуют резервные каналы
while s.find("/")>0:
print(s[0:s.find("/")])
s = s[s.find("/")+1:len(s)]
print(s)
Пример:
Bвeдитe aдрeс фaйлa:
C:/Фoтo/2013/Пoхoд/vasya.jpg
C:
Фoтo
2013
Пoхoд
vasya.jpg