Сформировать массив с random от -30 до 30.размер 10 элементов .сколько в массиве отрицательных элементов?

astafiev94 astafiev94    3   28.05.2019 12:10    0

Ответы
анастасиятихая анастасиятихая  01.10.2020 13:26
Begin
randomize;
for i:=1 to n do
a[i]:random (60)-30;
k:=0;
for i:=1 to n do
if a[i]<0 then k:=k+1;
writeln('k=',k);
end.

язык программирования - Pascal, k - количество отрицательных элементов
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика