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]: =твоя формула. формула должна быть такой, чтобы попадались и отрицательные элементы, а так, программа рабочая
1. Форма государственного правления в Нигерии. (Республика)
2. Кто является главой государства? (Президент)
3. Название океана, которым омывается Нигерия. (Атлантический)
4. Название денежной единицы Нигерии. (Найра)
5. Столица Нигерии. (Абуджа)
6. С каким государством граничит Нигерия на востоке? (Камерун)
7. Национальный вид спорта в Нигерии. (Футбол)
8. С каким государством граничит Нигерия на западе? (Бенин)
9. В Нигерии лево- или правостороннее движение? (Правостороннее)
10. Какое количество языков знает большая часть населения Нигерии? (Два)
11. В каком штате расположена наивысшая точка страны — гора Чаппал-Вадди? (Тараба)
12. Континент, на котором находится Нигерия. (Африка)
13. Какое место в мире занимает Нигерия по численности населения? (Шестое)
14. С каким государством граничит Нигерия на северо-востоке? (Чад)
15. В каком городе Нигерии проживает более 10 миллионов человек и это один из крупнейших городов Африки и мира? (Лагос)
16. В стране существует специальный праздник, который отмечается 8 сентября. Он называется "День..." Какое второе слово в названии праздника? (Грамотность)
17. Какая гора является высшей точкой плато Джос в Нигерии? (Шере)
18. Официальный язык в Нигерии. (Английский)
19. Какое место занимает Нигерия в Африке по численности мусульман? (Первое)
20. С каким государством граничит Нигерия на севере? (Нигер)
