С# одномерный массив

[Gigatrest]

В одномерном массиве, состоящем из N вещественных элементов, вычислить:
1) количество элементов массива, лежащих в диапазоне от А до В (значения А и В вво-
дятся с клавиатуры;
2) сумму элементов массива, расположенных после максимального элемента.
Упорядочить элементы массива по убыванию модулей элементов.

[spamer]

Что то вроде этого:

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <iostream.h>
# include <conio.h>
//---------------------------------------------------------------------------

#pragma argsused
int main(int argc, char* argv[])
{
cout << "Vvedite koli4estvo elementov massiva = ";
int n = 0;
cin >> n;
float mas[99];
for(int i=0;i<n;i++)
{
  cout << "[" << i << "] element massiva=";
  cin >> mas[i];
}

float A = 0, B = 0;
cout <<"Vvedite A = ";
cin >> A;
cout <<"Vvedite B = ";
cin >> B;

int k = 0;
for(int i=0;i<n;i++)
{
  if ((mas[i] < B) & (mas[i] > A ))
    k++;
}
cout << "Koli4estvo 4isel v diapazone [A..B] = " << k <<"\n";

float max = mas[0];
int num_max = 0;
for(int i=0;i<n;i++)
{
  if (mas[i] > max)
  {
    max = mas[i];
    num_max = i;
  }
}

float sum = 0;
for(int i=num_max + 1; i<n; i++)
  sum = sum + mas[i];

cout << "Summa el. posle max el. = " << sum;

getch();
        return 0;
}
//---------------------------------------------------------------------------

P.S. С упорядочиванием - сами подумайте как реализовать. Или показуйте наработки.

[Gigatrest]

это не с#...

[Igoressicus]

А что ж это по твоему ? =)

[Gigatrest]

у меня есть текст на паскале его надо реализовать в с#


uses crt;
const n=7;
var i,j,max:integer;
sum,a,b,temp:real;
x:array[1..n] of real;

begin
clrscr;
randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
x[i]:=random(40)-(random(1000)/(random(10)+1));
write(x[i]:7:1);
end;
writeln;
writeln('Введите диапазон значений');
readln(a,b);
max:=0;
for i:=1 to n do
if (x[i]>=a) and (x[i]<=b) then inc(max);
writeln('Всего ',max, ' элементов лежит в заданном диапазоне');
sum:=0;max:=1;
for i:=2 to n do
begin
if x[i]>x[max] then
begin
max:=i;
sum:=0;
end
else sum:=sum+x[i];
end;

writeln('Сумма после максимального:',sum:7:1);
for i:=2 to n do
for j:=n downto i do
if abs(x[j-1])>abs(x[j]) then begin
temp:=x[j];
x[j]:=x[j-1];
x[j-1]:=temp;
end;
for i:=1 to n do
write(x[i]:7:1);
readln;
end.

[Sazary]

Igoressicus, это C++.

Gigatrest, вы можете посмотреть на алгоритм и переписать на шарпе.

[Igoressicus]

Тьху, я уже увидел, что С++! Тупанул, на форуме подсветка кода паскалевкая, вот и сбила с верного пути.

[Gigatrest]

а нельзя мой вариант на паскале адаптировать к си шарпу?

[Sazary]

Сообщение от Gigatrest

а нельзя мой вариант на паскале адаптировать к си шарпу?

Можно. Почему нет?

[Gigatrest]

эмм... мне бы как бы еще и реализовать желательно помочь...