#include <iostream>
using namespace std;
int main()
{
int n, x = 0, count = 0;
cin >> n;
int arr[n];
for (int i = 0; i < n; i++)
{
cin >> arr[i];
for (int i = 0; i < n; i++)
{
if (arr[i] > 0 && x == 0)
{
cout << i; //положительный
x = 1
}
if (arr[i] < 0) count++;
}
cout << endl << count;
return 0;
}
Объяснение:
Введите сначало количество елементов массива, а потом сами елементы через пробел
Выведет номер первого положительного и количество отрицательных.
program number1;
var a: array [1..5] of integer;
i,min,max: integer;
Begin
writeln('Введите 5 значений массива');
for i:=1 to 5 do
readln(a[i]);
min:=a[1];
max:=a[1];
for i:=1 to 5 do
Begin
if (a[i]>=max) then max:=a[i];
if (a[i]<=min) then min:=a[i];
End;
for i:=1 to 5 do
Begin
if max=a[i] then
Begin
writeln('Максимальное значение: ',a[i],' [',i,']');
max:=a[i];
End;
if min=a[i] then
Begin
writeln('Минимальное значение: ',a[i],' [',i,']');
min:=a[i];
End;
End;
writeln('Среднее арифметическое: ',(min+max)/2);
End.
ответ во вложении