На башковское дело выходит с 11
Литосфера-это твердая оболочка Земли.
1)<span>Состоит из земной коры и верхней части мантии, до астеносферы, где скорости сейсмических волн понижаются, свидетельствуя об изменении пластичности пород. В строении литосферы выделяют подвижные области (складчатые пояса) и относительно стабильные платформы.
2)</span><span>Толщина литосферы на суше в среднем колеблется от 35-40 км (на равнинных участках) до 70 км (в горных районах)
3)</span><span>Литосфера под океанами и континентами значительно различается. Литосфера под континентами состоит из осадочного, гранитного и базальтового слоев общей мощностью до 80 км. Литосфера под океанами претерпела множество этапов частичного плавления в результате образования океанической коры, она сильно обеднена легкоплавкими редкими элементами, в основном состоит из дунитов и гарцбургитов, её толща составляет 5—10 км, а гранитный слой полностью отсутствует.
4)</span>С природными явлениями в литосфере связаны значительные трудности в жизни и деятельности человека. Особенно опасны стихийные природные явления в литосфере. Нередко они носят катастрофический характер и сопровождаются значительными разрушениями и изменениями окружающего ландшафта.
<span>Землетрясения. - Вулканы. - Обвалы. - Сели. - Оползни.</span>
Постигает мир с помощью художественных образов
Var t,i,x,max:integer;
begin
max:=0;t:=0;
repeat
begin
x:=0;
read(x);
if (x>0) and (x=max) then i:=i+1;
<span>if x>max then </span>
<span>begin </span>
max:=x;
i:=1;
end;
t:=t+1;
end;
until (x<=0) or (t>=1000) or (x mod 1>0);
if (x<0) or (x mod 1>0) then begin i:=-1; writeln('Нельзя вводить ненатуральные числа');end;
if i=0 then writeln('Введён только ноль');
if i>0 then writeln('Чисел, равных максимуму: ', i);
<span>end.</span>