В массиве A=(a1, а2, ..., аn) удалить все подряд идущие отрицательные элементы, ...

July 2022 1 11 Report

В массиве A=(a1, а2, ..., аn) удалить все подряд идущие отрицательные элементы, идущие вслед за минимальным элементом массива.(Программа с использованием массива и цикла for)Паскаль

Answers & Comments

danulpopov Var
a, b: array[1..110000] of integer;
i, n, j, cnt, min: integer;
fl: boolean;
begin
Readln(n);
for i := 1 to n do
Read(a[i]);
min:= a[1];
j:= 1;
for i := 2 to n do
if a[i] < min then
begin
    min:= a[i];
j:= i;
end;
fl := true;
for i:= 1 to j do
write(a[i], ' ');
for i:= j + 1 to n do
begin
if a[i] > 0 then fl := false;
if (a[i] < 0)and(fl) then continue;
write(a[i], ' ');
end;
end.

nf781 Если я ввела размерность массива 5

nf781 Исходный массив:1 -1 2 3 6

nf781 То у меня вывелось на монитор:1 -1 2 3 6

nf781 Почему -1 не было удалено?

danulpopov потому что минимальный элемент - "-1",а нужно удалить все "ВСЛЕД ИДУЩИЕ" за этим элементом

nf781 Извините,а какое решение должно быть?

danulpopov Вопроса не понял сейчас, если честно. По тому условию, что вы написали, я написал правильное решение. Напишите другое услвовие - напишу другое решение

nf781 если я ввела 5 -1 2 3 6 -2,то что мне выведется на экран

danulpopov 5 -1 2 3 6 -2, если 5 -2 -1 2 3 6 , то 5, -2 2 3 6

nf781 Спасибо большое)

Answers & Comments

dano dva odinakovye po dline odnomernye massivy obobedinyat ih v tretij massi

dana matrica vnmnajti v kazhdoj stroke matricy maksimalnyj i minimalnyj ele6dc57917e1cb8153a7cc49d1ee78a121 33777

dana matrica vnmnajti v kazhdoj stroke matricy maksimalnyj i minimalnyj ele

v odnomernom massive aa1 a2 an udalit vse otricatelnye elementy ras

iz massiva udalit vse elementy kotorye menshe 0sostavit programmu v paskalee1b4b53ac08316b1ef2b80e5176ff9b6 82743

dan massiv vstavit chislo k posle pervogo otricatelnogo elementapaskalnapishi

iz massiva udalit vse elementy kotorye menshe 0sostavit programmu v paskale

dano naturalnoe chislo n i posledovatelnyh celyh chiselkazhdoe iz kotoryh lezhita816647d276f7c864976ba3f027dfc9f 17313

dano naturalnoe chislo n i posledovatelnyh celyh chiselkazhdoe iz kotoryh lezhit

pochemu uglerod 4 sobirayut metodom vytesneniya vody

рекомендуемые вопросы

Helpful Links

Helpful Social