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

Ответы 1

  • writeln('Введите количество элементов в массиве');readln(n);for i:=1 to n dobeginwriteln('Введите элемент массива');readln (A[i]); end;Sum:=0;for i:=1 to n doif a[i]>0 thenSum:=Sum+a[i];Writeln('Сумма положительных элементов = ' Sum)
  • Добавить свой ответ

Войти через Google

или

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

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

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