• задан одномерный массив из н чисел сосчитать количество элементов массива положительных отрицательных и нулевых

Ответы 1

  • const N = 10;varmas: array [1..N] of integer;i,x,y,z:integer;beginfor i:=1 to 10 doread(mas[i]);x:=0;y:=0;z:=0;for i:=1 to 10 do beginif mas[i]>0 thenx:=x+1else if mas[i]<0 theny:=y+1elsez:=z+1end;writeln('Положительных элементов: ',x);writeln('Отрицательных элементов: ',y);writeln('Нулевых элементов: ',z);end.
    • Автор:

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

Войти через Google

или

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

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

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