const n=30;
var k: array[1..n] of integer; i,t,p: integer;
begin
randomize;
for i: =1 to n do begin
k[i]: =random(100);
if (k[i]> 0) then p: =p+1;
if (i=3) and (k[3]> 0) then t: =k[3];
end;
if (p< 3) then write('в массиве меньше трех положительных элементов') else writeln('третий элемент массива равен ', t);
end.
отрицательного значения в массиве не будет, напиши формулу к массиву k[i]: =твоя формула. формула должна быть такой, чтобы попадались и отрицательные элементы, а так, программа рабочая
2. Максимальная глубина – 2210 м
3. Глубины очень быстро увеличиваются от берегов к центру моря.
4. Нарастание солёности происходит с северо-запада на юго-восток от 13‰ до 18‰.
5. Расположено в двух климатических поясах. Умеренный климатический пояс И Субтропический климатический пояс
6. Черноморская котловина состоит из обширной и глубокой впадины с крутыми склонами и самым большим по размерам шельфом на северо-западе. Широкая полоса малых глубин простирается у западного побережья и в Керченско-Таманском районе. На большей части моря приличные глубины находятся вблизи берегов, местами подступая к ним почти вплотную.
7. В Чёрном море обитает 2500 видов животных Главными причинами биологической бедности являются низкая солёность воды и присутствие сероводорода, поэтому в основном черноморские обитатели населяют прибрежное мелководье. Представители мелководья: мидии, гребешки, устрицы, медузы, морские звёзды. Из рыб обитают: бычки, кефаль, морской ёрш, сельдь, тюлька и ряд других. Млекопитающие представлены дельфинами и белобрюхим тюленем. Из птиц распространены чайки, буревестники, бакланы.