• Дан массив из n элементов. Подсчитать в нем количество положительных элементов.Очень срочно!

Ответы 1

  • //PascalABC.NET v3.3 1633

    const n = 15;

    var arr: array [1..n] of integer;

    begin

    for var i:=1 to n do

     arr[i]:=random(-5,5);

    write('Исходный массив: ');

    arr.PrintLn(', ');

    var count:=0;

    for var i:=1 to n do

     if arr[i] > 0 then

       count += 1;

    writeln('Количество положительных элементов: '+count);

    end.

    • Автор:

      kitty95
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years