ПОМОГИТЕ ПОЖАЛУЙСТА, СРОЧНО НАДО! Положительные элементы вещественного массива…

Question

67

ПОМОГИТЕ ПОЖАЛУЙСТА, СРОЧНО НАДО! Положительные элементы вещественного массива разделить на сумму отрицательных элементов (массив брать до 10)

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

konstantinl · Accepted Answer

48

konstantinl

14 февраля 2023

vara: array[1… 10]of extended; i,otr,m,pol: integer; beginfor i: =1 to 10 dobeginread (a[i]); if a[i]<0 then otr: =a[i]+otr; if a[i]>0 then pol: =pol+1; end; m: =(pol/otr); write (m); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: