ХЕЛП 100 баллов .Имеется массив ** N чисел заменить все отрицательные числа ** 0 и...

Question

ХЕЛП 100 баллов .Имеется массив на N чисел заменить все отрицательные числа на 0 и вывести весь массив.

Answer 1

Const n=50;
var a:array[1..n] of integer; b,i:integer;

begin
writeln('Введите размер массива: ');
readln(b);
for i:=1 to b do
begin
writeln('Введите ',i,' элемент');
readln(a[i]);
end;
for i:=1 to n do
if a[i]<0 then a[i]:=0;<br>for i:=1 to b do write(a[i],' ');
end.

Comments

фе

---

что-то не так?

---

почему бы не выводить и проверять в одном цикле?

---

спасиб паренек.Но поздно(((

Answer 2

C#:
            int[] a = { 5,3,4,9,-6,-7,-2,-1};            for (int i = 0; i < a.Length; i++)            {                if (a[i] < 0) {                    a[i] = 0;                }                Console.WriteLine(a[i]);            }            Console.ReadKey();