profile
Опубликовано 6 лет назад по предмету Информатика от eniks77

заполните случайными числами из интервала от -44 до 18 одномерный массив,состоящий из 15 значений.
Определите количество элементов массива,непревышающих число 13.

  1. Ответ
    Ответ дан ingr

    var

       d : array of integer := new integer[15];

       n : integer;

    begin

       d := arrRandom(15, -44, 18);

       for var i := 0 to 14 do if d[i] <= 13 then n += 1;

       writeln(d);

       writeln(n);

    end.

Самые новые вопросы