sofiya130308
07.04.2020 05:10

Какой маршрут можно открыть чтобы автобусные сообщение существовало между всеми населёнными пунктами с наименьшими затратами? !

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
arekhvanova
20.07.2021 14:50

console.writeline("введите количество чисел");

            int n = convert.toint32(console.;

            int[] a = new int[n];

            console.writeline("введите числа");

            for (int i = 0; i < n; i++)

                a[i] = convert.toint32(console.;

            int count = 0;

            int min=a[0];

            int max = a[0];

                console.writeline("количество отрицательных");

                for (int i = 0; i < n; i++)

                if (a[i] < 0) { count++; }

                console.writeline(count);

           

            for (int i = 0; i < n; i++)

            if (min > a[i]) { min = a[i]; }

            console.writeline("минимальный элемент = "+min   );

         

            for (int i = 0; i < n; i++)

                if (max < a[i]) { max = a[i]; }

              console.writeline("максимальный элемент = "+ max);

            int s = 0;

            s = min + max;

            console.writeline("сумма");

            console.writeline(s);

            console.writeline("числа кратные пяти и не больше числа задаваемым пользователем");

            for (int i = 0; i < n; i++)

                if (a[i] % 5==0 & & a[i]< n)

                   

                { console.writeline(a[i]); }

            console.readline();

0,0(0 оценок)
Ответ:
Vanek11111100
18.03.2020 04:13
//Pascal ABC.NET 3.1 сборка 1219

Const
 n=5;

Var
 max1,max2,min1,min2,i:integer;
 ar:array[1..n] of integer;
begin
 max1:=integer.MinValue;
 max2:=integer.MinValue;
 min1:=integer.MaxValue;
 min2:=integer.MaxValue;
 for i:=1 to n do
  begin
   readln(ar[i]);
   if (ar[i]<max1) and (ar[i]>max2) then max2:=ar[i] else
   if ar[i]>max1 then
   begin
   max2:=max1;
   max1:=ar[i];
   end;
   if (ar[i]>min1) and (ar[i]<min2) then min2:=ar[i] else
   if ar[i]<min1 then
   begin
   max2:=max1;
   min1:=ar[i];
   end;
  end;
 writeln('Сумма максимумов:',max1+max2);
 writeln('Cумма минимумов:',min1+min2);
end.

Пример ввода:
1
2
3
4
5
Пример вывода:
Сумма максимумов:9
Cумма минимумов:3
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота