(Паскаль) 1. Заполнить с клавиатуры массив из 10 элементов. Подсчитать количество…

Question

98

(Паскаль) 1. Заполнить с клавиатуры массив из 10 элементов. Подсчитать количество положительных и отрицательных элементов массива.

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

ответить

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

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

seoshnegcom · Accepted Answer

81

seoshnegcom

08 февраля 2024

Program chik2; var a,i,h,l: integer; beginl: =0; h: =0; for i: =1 to 10 dobeginread (a); if (a>0) then l: =l+1; if (a<0) then h: =h+1; end; write (l,',h); end.l-кол-во положh-кол-во отрицательных

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

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

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

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