Кого из мореплавателей называют украинским магелленом

Юрия Лисянского. Потому что он совершил первое русское кругосветное путешествие.

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 86 600                                     603 700 43 в мире

население, чел. 8 997 400                                 45 872 000 28 в мире

рост численности населения, в год 0,75%     -0,63%

средняя продолжительность  

жизни, лет 66,3                                                                     68,1

плотность населения, чел./км2 103,90                           75,98

официальные языки азербайджанский   украинский

валюта манат   гривна

международный телефонный код 994   380

зона в internet .az   .ua

часовые пояса utc+4   utc+2

международные организации снг   снг

граничит по суше россия, иран, армения, грузия, турция

                                                        беларусь, россия, румыния, молдавия, венгрия, словакия, польша

выход к морям и океанам каспийское море  

                                                                                                                                          азовское, чёрное моря