Найти минимальный элемент массива и его значение заменить суммой всех предшествующих ему элементов

@J0n1cK · Регистрация: 07.03.2009

Author24 — интернет-сервис помощи студентам

найти мин элемент массива и его значение заменить суммой всех предшествующих ему элементов, вывести новый массив на экран! массив из 50 чисел.

@Monte-Cristo · 07.03.2009, 17:39

C++
1
2
3
4
5
6
7
8
9
10
int mas[50];
int min=0;
 
for (int i=0; i<50; i++)
{
if (mas[min] > mas[i]) min=i;
}
 
for (int i=0; i<min; i++)
cout << mas[i];

@Викдон · 07.03.2009, 17:42

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Const N=50;
var Mas:array[1..N] of integer;
    i:integer;
    min,num,Sum:integer;
begin
Randomize;
  for i:=1 to N do
   Mas[i]:=Random(100);
 
  writeln('ISHODNII MASSIV:');
   for i:=1 to N do
    write(mas[i],' ');
   writeln;
 
   min:=Mas[1];
   num:=1;
 
   for i:=1 to N do
     if min>Mas[i] then
      begin
       min:=Mas[i];
       num:=i;
      end;
 
 
    Sum:=0;
   for i:=1 to num-1 do
    Sum:=Sum+Mas[i];
 
   writeln('Min elements: ',min,'  number min element: ',num);
   writeln('Result: ',Sum);
   Mas[num]:=Sum;
     
  writeln('Itogovii massiv:');
   for i:=1 to N do
    write(mas[i],' ');
 
 
readln;
end.

@J0n1cK · 07.03.2009, 17:43 **[ТС]**

[QUOTE=Don Corleone;112933][CPP]
int mas[50];
int min=0;

for (int i=0; i<50; i++)
{
if (mas[min] > mas[i]) min=i;
}

for (int i=0; i<min; i++)
cout << mas[i];

прости конечно, это что за У-Ж-А-С такой - это заработает ? на языке паскаль ?

@Викдон · 07.03.2009, 17:44

Это написано на С++ было...видимо перепутал он)

@J0n1cK · 07.03.2009, 17:44 **[ТС]**

Викдон,

СПАСИБО ДРУГ!

@Monte-Cristo · 07.03.2009, 17:46

Сообщение от Викдон

Это написано на С++ было...видимо перепутал он)

ага) пардон... лоханулся малеха

@Puporev · 07.03.2009, 17:48

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses crt;
const n=50;
var a:array[1..n] of integer;
    i,min,imin,sum:integer;
begin
clrscr;
randomize;
writeln('Massiv:');
for i:=1 to n do
  begin
    a[i]:=random(20);
    write(a[i],' ');
  end;
writeln;
min:=a[1];imin:=1;
for i:=1 to n do
if a[i]<min then
   begin
     min:=a[i];{находим минимум}
     imin:=i;{его номер}
   end;
   writeln;
   writeln('Min element=',min,'  ego nomer=',imin);
   writeln;
sum:=0;
for i:=1 to imin-1 do{от 1 до элемента перед минимальным}
sum:=sum+a[i];{считаем сумму}
a[imin]:=sum;{записываем ее вместо минимального}
writeln('Rezultat:');
for i:=1 to n do
write(a[i],' ');
readln
end.

@J0n1cK · 07.03.2009, 18:01 **[ТС]**

Сообщение от Don Corleone

ага) пардон... лоханулся малеха

прости конечно, спасибо за труд!
но задача немного не в этом, задача в том что первый массив я ввожу с клавиатуры, а
потом нахожу мин элемент массива, нахожу сумму все предшествующих ему элементов, потом заменю значение этого "мин элемента" на сумму.

дальше вовожу уже другой массив на печать.

@Викдон · 07.03.2009, 18:21

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Const N=50;
var Mas:array[1..N] of integer;
    i:integer;
    min,num,Sum:integer;
begin
Randomize;
  for i:=1 to N do
    begin
      write('Input ',i,' element: ');
      Readln(Mas[i]);
    end;
 
 
 
   min:=Mas[1];
   num:=1;
 
   for i:=1 to N do
     if min>Mas[i] then
      begin
       min:=Mas[i];
       num:=i;
      end;
 
 
    Sum:=0;
   for i:=1 to num-1 do
    Sum:=Sum+Mas[i];
   
   Mas[num]:=Sum;
 
   writeln('Min elements: ',min,'  number min element: ',num);
   
    for i:=1 to N do
    begin
      write(Mas[i],' ');
      
    end;
 
readln;
end.

Новые блоги и статьи Все статьи Все блоги /
Согласованность транзакций в MongoDB Codd 30.04.2025 MongoDB, начинавшая свой путь как классическая NoSQL система с акцентом на гибкость и масштабируемость, сильно спрогрессировала, включив в свой арсенал поддержку транзакционной согласованности. Это. . .	Продвинутый ввод-вывод в Java: NIO, NIO.2 и асинхронный I/O Javaican 30.04.2025 Когда речь заходит о вводе-выводе в Java, классический пакет java. io долгие годы был единственным вариантом для разработчиков, но его ограничения становились всё очевиднее с ростом требований к. . .	Обнаружение объектов в реальном времени на Python с YOLO и OpenCV AI_Generated 29.04.2025 Компьютерное зрение — одна из самых динамично развивающихся областей искусственного интеллекта. В нашем мире, где визуальная информация стала доминирующим способом коммуникации, способность машин. . .	Эффективные парсеры и токенизаторы строк на C# UnmanagedCoder 29.04.2025 Обработка текстовых данных — частая задача в программировании, с которой сталкивается почти каждый разработчик. Парсеры и токенизаторы составляют основу множества современных приложений: от. . .	C++ в XXI веке - Эволюция языка и взгляд Бьярне Страуструпа bytestream 29.04.2025 C++ существует уже более 45 лет с момента его первоначальной концепции. Как и было задумано, он эволюционировал, отвечая на новые вызовы, но многие разработчики продолжают использовать C++ так, будто. . .
Слабые указатели в Go: управление памятью и предотвращение утечек ресурсов golander 29.04.2025 Управление памятью — один из краеугольных камней разработки высоконагруженных приложений. Го (Go) занимает уникальную нишу в этом вопросе, предоставляя разработчикам автоматическое управление памятью. . .	Разработка кастомных расширений для компилятора C++ NullReferenced 29.04.2025 Создание кастомных расширений для компиляторов C++ — инструмент оптимизации кода, внедрения новых языковых функций и автоматизации задач. Многие разработчики недооценивают гибкость современных. . .	Гайд по обработке исключений в C# stackOverflow 29.04.2025 Разработка надёжного программного обеспечения невозможна без грамотной обработки исключительных ситуаций. Любая программа, независимо от её размера и сложности, может столкнуться с непредвиденными. . .	Создаем RESTful API с Laravel Jason-Webb 28.04.2025 REST (Representational State Transfer) — это архитектурный стиль, который определяет набор принципов для создания веб-сервисов. Этот подход к построению API стал стандартом де-факто в современной. . .	Дженерики в C# - продвинутые техники stackOverflow 28.04.2025 История дженериков началась с простой идеи — создать механизм для разработки типобезопасного кода без потери производительности. До их появления программисты использовали неуклюжие преобразования. . .

@J0n1cK 1 / 1 / 0 Регистрация: 07.03.2009 Сообщений: 24

	Найти минимальный элемент массива и его значение заменить суммой всех предшествующих ему элементов 07.03.2009, 17:17. Показов 4342. Ответов 9 Метки нет (Все метки) найти мин элемент массива и его значение заменить суммой всех предшествующих ему элементов, вывести новый массив на экран! массив из 50 чисел. 0

@J0n1cK 1 / 1 / 0 Регистрация: 07.03.2009 Сообщений: 24
	07.03.2009, 17:43 [ТС]
	[QUOTE=Don Corleone;112933][CPP] int mas[50]; int min=0; for (int i=0; i<50; i++) { if (mas[min] > mas[i]) min=i; } for (int i=0; i<min; i++) cout << mas[i]; прости конечно, это что за У-Ж-А-С такой - это заработает ? на языке паскаль ? 0

@Викдон 67 / 67 / 24 Регистрация: 21.11.2008 Сообщений: 226
	07.03.2009, 17:44
	Это написано на С++ было...видимо перепутал он) 0

@J0n1cK 1 / 1 / 0 Регистрация: 07.03.2009 Сообщений: 24
	07.03.2009, 17:44 [ТС]
	Викдон, СПАСИБО ДРУГ! 0

Опции темы