Const n=30;
var a:array[1..n] of integer;
k,i:integer;
begin
for i:=1 to n do begin
a[i]:=random(21)-10;
write(a[i],' ');
end;
writeln;
k:=0; i:=0;
while (i<n)and(k<3) do
begin
i:=i+1;
if a[i]>0 then k:=k+1;
end;
if k=3
then writeln('Номер третьего положительного элемента = ',i)
else writeln('В массиве нет 3 положительных элементов');
end.
Пример (для n=20):
-4 -10 3 -4 6 1 -9 4 -10 -8 7 7 0 -2 9 -4 -10 -3 1 -2
Номер третьего положительного элемента = 6
ПЕРИФЕРИЯ (от греч. periphereia - окружность) -
<span>1) местность (часть страны, области и т. п.) , отдаленная от центра; окраина. </span>
<span>Приехать с периферии. Работать на периферии. </span>
<span>□ </span>
<span>Унылое слово «провинция» потеряло право на местожительство в нашей стране. Когда сегодня хотят упомянуть о пунктах, отдаленных от центра, говорят — периферия. Диковский, Периферия. </span>
<span>2) внешняя, удаленная от центра часть чего-либо. </span>
<span>Огонь всегда распространяется из центра к периферии, очищая площадь в виде круга. Сушкина, Там, где шумит океан и царит вечное лето. </span>
<span>3) альбом группы «DDT», записанный в 1984 году в Уфе. Альбом вышел также и на грампластинке, но уже в 1991 году на лейбле «ЭРИО» . </span>
<span>Информация об этом альбоме включена в книгу Александра Кушнира «100 магнитоальбомов советского рока» . </span>
<span>Дорожки - Автор всех песен — Юрий Шевчук. </span>
<span>«Мы из Уфы» — 4:23; «Наполним небо добротой» — 6:07; «Понедельник» — 3:39; «Памятник (Пушкину) » — 2:20; «Хиппаны» — 4:50; «Я получил эту роль» — 5:28; «Периферия» — 3:37; «Частушки» — 0:48 </span>
<span>В записи участвовали - Юрий Шевчук — гитара, вокал, текст, музыка, Сергей Рудой — ударные, декламация, Рустам Ризванов — лидер-гитара, Геннадий Родин — бас-гитара, Владислав Синчилло — KORG POLY-61, Игорь Верещака — звук </span>
<span>4) в компьютерной технике — совокупность внешних устройств. </span>
<span>5) Район Кошице-периферия Okres Košice okolie Страна Словакия Входит в Кошицкий край Включает 2 города, 112 деревень Административный центр Кошице Население (2001) 106 999 Плотность 70 чел. /км² Площадь 1 533 км² Телефонный код 056. Граничит с Венгрией. Национальный состав: Словаки 79,3 %, Венгры 13,2 %, Цыгане 5,0 %. Конфессиональный состав: Католики 76,6 %, Реформаты 7,5 %, Греко-католики 4,4 %, Лютеране 3,7 %. </span>
<span>6) Периферия (Греция) — название самой крупной единицы административного деления Греции (также в русском языке используется термины «область» , «административный округ» и «регион») . </span>
<span>Так же: </span>
<span>- Модель «центр-периферия» в экономической географии — модель регионального развития. </span>
<span>- Периферическая нервная система в анатомии — часть нервной системы за пределами - головного и спинного мозга. </span>
<span>- Периферийное сканирование в цифровой технике — вид структурного тестирования полупроводниковой печатной платы.</span>
1) верно
2) неверно, отсутствует тип элементов массива
3) неверно, кириллица в имени массива и другие ошибки
4) верно