Задать вопрос
30 декабря, 05:33

заменить все отрицательные элементы массива нулями

+5
Ответы (1)
  1. 30 декабря, 08:20
    0
    Const

    n=10;

    var

    a:array[1 ... n]of integer;

    i:integer;

    begin

    for i:=1 to n do

    begin

    a[i]:=random (100) - 50;

    write (a[i]:4);

    if a[i]<0 then

    a[i]:=0;

    end;

    writeln;

    for i:=1 to n do

    write (a[i]:4);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «заменить все отрицательные элементы массива нулями ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы