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]: =твоя формула. формула должна быть такой, чтобы попадались и отрицательные элементы, а так, программа рабочая
Протяженность в градусах: 30°
Протяженность в километрах: 3138 км
Объяснение:
1. Определяем координаты крайних точек материка Южная Америка по параллели 20° ю. ш.:
Крайняя западная точка: 20° ю. ш. 70° 30′ з. д.;
Крайняя восточная точка: 20° ю. ш. 40° 30′ з. д.
2. Определяем протяженность в градусах, т.е. находим разность по долготе между крайними точками:
70° 30′ - 40° 30′ = 30°
3. Определяем протяженность в километрах. Зная, что по параллели 20° длинна дуги меридиана (долготы) в 1° равна 104,6 км, считаем:
30° * 104,6 км = 3138 км
Примечание: Длина дуги меридиана (долготы) в 1° для определенной параллели у меня в атласе подписана на физической карте мира, т.е. вы можете найти их значения в атласе.
