Uses crt; const n=10; var a:array[1..n] of integer; s,i,min,k:integer; begin min:=1000; for i:=1 to n do begin readln(a[i]); if a[i]<min then begin min:=a[i]; k:=i; end; end; s:=0; for i:=k+1 to n do s:=s+a[i]; writeln(s); end.
// исходный массив int mas[10] = {21,13,52,43,9,18,27,34,28,56}; int i = 0; // счетчик int index_min; // переменна для хранения индекса минимального элемента в массиве int min = mas[0]; // сначала принимаем 1ый элемент как минимальный while (i < 10) { // проходим по всему массиву if (mas[i] < min) { // если текущий элемент меньше минимального min = mas[i]; // делаем его минимальным index_min = i; // запоминаем его индекс } i++; // увеличиваем счетчик } printf("Min = %d ", mas[index_min]); // выводим минимальный элемент int Sum = 0; // переменная для подсчета суммы i = index_min+1; // индес следующего элемента - правее за минимальным while (i < 10) { // пробегаем по массиву от следующего за минимальным до конца Sum += mas[i]; // суммируем i++; // увеличиваем счетчик } printf("Sum = %d ", Sum); // выводим результат суммы
Var a: array [1..10] of Integer; i, min, sum: integer; begin for i := 1 to 10 do begin a[i] := random(50); writeln('[', i, '] => ', a[i]); end; min := a[1]; for i := 2 to 10 do if (min > a[i]) then min := a[i]; i := 1; while ((i <= 10) and (a[i] <> min)) do begin sum := sum + a[i]; inc(i); end; writeln(sum); end.
const n=10;
var a:array[1..n] of integer;
s,i,min,k:integer;
begin
min:=1000;
for i:=1 to n do
begin
readln(a[i]);
if a[i]<min then begin min:=a[i]; k:=i; end;
end;
s:=0;
for i:=k+1 to n do
s:=s+a[i];
writeln(s);
end.
int mas[10] = {21,13,52,43,9,18,27,34,28,56};
int i = 0; // счетчик
int index_min; // переменна для хранения индекса минимального элемента в массиве
int min = mas[0]; // сначала принимаем 1ый элемент как минимальный
while (i < 10) { // проходим по всему массиву
if (mas[i] < min) { // если текущий элемент меньше минимального
min = mas[i]; // делаем его минимальным
index_min = i; // запоминаем его индекс
} i++; // увеличиваем счетчик }
printf("Min = %d ", mas[index_min]); // выводим минимальный элемент
int Sum = 0; // переменная для подсчета суммы
i = index_min+1; // индес следующего элемента - правее за минимальным
while (i < 10) { // пробегаем по массиву от следующего за минимальным до конца
Sum += mas[i]; // суммируем
i++; // увеличиваем счетчик
}
printf("Sum = %d ", Sum); // выводим результат суммы
i, min, sum: integer;
begin
for i := 1 to 10 do
begin
a[i] := random(50);
writeln('[', i, '] => ', a[i]);
end;
min := a[1];
for i := 2 to 10 do
if (min > a[i]) then min := a[i];
i := 1;
while ((i <= 10) and (a[i] <> min)) do
begin
sum := sum + a[i];
inc(i);
end;
writeln(sum);
end.