Количество положительных, отрицательных и равных нулю элементов массива
Авторgospodaretsva.comПросмотров13к.Обновлено
Сгенерировать 20 случайных целых чисел в диапазоне от -5 до 4, записать их в ячейки массива. Посчитать сколько среди них положительных, отрицательных и нулевых значений. Вывести на экран элементы массива и посчитанные количества.
Присвоить счетчикам положительных, отрицательных и нулевых чисел значения 0.
В цикле
генерировать случайное число и записывать его в соответствующую ячейку массива,
выводить на экран,
сравнивать с нулем и в зависимости от результата увеличить на 1 либо счетчик пложительных чисел, либо отрицательных, либо нулевых.
Вывести на экран значения счетчиков.
Pascal
количество положительных элементов массива паскаль
const N = 20;
var
a: array[1..N] of integer;
i, pos, neg, zero: byte;
begin
randomize;
pos := 0;
neg := 0;
zero := 0;
for i:=1 to N do begin
a[i] := random(10)-5;
write(a[i]:3);
if a[i] < 0 then
neg := neg + 1
else
if a[i] > 0 then
pos := pos + 1
else
zero := zero + 1;
end;
writeln;
writeln('Положительных: ', pos);
writeln('Отрицательных: ', neg);
writeln('Равных нулю: ', zero);
end.
количество положительных элементов массива python (питон)
from random import random
neg = pos = zero = 0
a = []
for i in range(20):
n = int(random() * 10) - 5
a.append(n)
print(n, end=' ')
if n > 0:
pos += 1
elif n < 0:
neg += 1
else:
zero += 1
алг положительные элементы
нач
цел N = 20
цел таб a[1:N]
цел pos=0, neg=0, zero=0,i
нц для i от 1 до N
a[i] := int(rand(0,10))-5
вывод a[i], " "
если a[i] > 0 то pos := pos + 1
иначе
если a[i] < 0 то neg := neg + 1
иначе zero := zero + 1
все
все
кц
вывод нс, "Положительных: ", pos
вывод нс, "Отрицательных: ", neg
вывод нс, "Равных нулю: ", zero
кон
Basic-256
N = 20
dim a(N)
pos = 0
neg = 0
zero = 0
for i=0 to N-1
a[i] = int(rand()*10) - 5 # от 4 до -5
print a[i]+ " ";
if a[i] < 0 then
neg = neg + 1
else
if a[i] > 0 then
pos = pos+1
else
zero = zero + 1
endif
endif
next i
print
print "Positive: " + pos
print "Negative: " + neg
print "Zero: " + zero
количество положительных элементов массива паскаль
const N = 20; var a: array[1..N] of integer; i, pos, neg, zero: byte; begin randomize; pos := 0; neg := 0; zero := 0; for i:=1 to N do begin a[i] := random(10)-5; write(a[i]:3); if a[i] < 0 then neg := neg + 1 else if a[i] > 0 then pos := pos + 1 else zero := zero + 1; end; writeln; writeln('Положительных: ', pos); writeln('Отрицательных: ', neg); writeln('Равных нулю: ', zero); end.
количество положительных элементов массива python (питон)
from random import random neg = pos = zero = 0 a = [] for i in range(20): n = int(random() * 10) - 5 a.append(n) print(n, end=' ') if n > 0: pos += 1 elif n < 0: neg += 1 else: zero += 1
алг положительные элементы нач цел N = 20 цел таб a[1:N] цел pos=0, neg=0, zero=0,i нц для i от 1 до N a[i] := int(rand(0,10))-5 вывод a[i], " " если a[i] > 0 то pos := pos + 1 иначе если a[i] < 0 то neg := neg + 1 иначе zero := zero + 1 все все кц вывод нс, "Положительных: ", pos вывод нс, "Отрицательных: ", neg вывод нс, "Равных нулю: ", zero кон
Basic-256
N = 20 dim a(N) pos = 0 neg = 0 zero = 0 for i=0 to N-1 a[i] = int(rand()*10) - 5 # от 4 до -5 print a[i]+ " "; if a[i] < 0 then neg = neg + 1 else if a[i] > 0 then pos = pos+1 else zero = zero + 1 endif endif next i print print "Positive: " + pos print "Negative: " + neg print "Zero: " + zero