Дан массив из n элементов. подсчитать в нем количество положительных элементов.

BTSBTSBTS BTSBTSBTS    1   03.10.2019 02:20    2

Ответы
danilpus2016 danilpus2016  09.10.2020 12:59

//PascalABC.NET v3.3 1633

const n = 15;

var arr: array [1..n] of integer;

begin

for var i:=1 to n do

 arr[i]:=random(-5,5);

write('Исходный массив: ');

arr.PrintLn(', ');


var count:=0;

for var i:=1 to n do

 if arr[i] > 0 then

   count += 1;

writeln('Количество положительных элементов: '+count);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика