Ответы на вопрос:
Аппаратный интерфейс — средства взаимодействия между устройствами компьютера; обеспечивается производителями оборудования.
Объяснение:
var
a:array[1..20] of integer;
i,pp:integer;
Begin
randomize;
pp:=-1;
for i:=1 to 20 do begin
a[i]:=random(41)-30;
write(a[i],' ');
if (a[i]>0) and (pp=-1) then pp:=i;
end;
Writeln();
Writeln(pp);
end.
Если положительных элементов не было то выведется -1
Популярно: Информатика
-
ruslansuxenco314.03.2022 21:04
-
ququetoya08.05.2021 03:37
-
29Vladislava1323.11.2022 09:43
-
lissasalvatore13.02.2020 22:12
-
Kseniya00628.02.2022 03:11
-
Ender22220.12.2022 22:55
-
zvezda02613.04.2022 05:18
-
AnnaVag891213.12.2020 16:08
-
6e3yMHbIu111.10.2022 01:23
-
sultanguloverik230.03.2022 23:07