Question

Написать программу которая подсчитывает количество элементов равных к еденице!

Answer 1

Program mas1;
var a:array[1..100] of integer;
i,k,n:integer;
Begin
randomize;
k:=0;
writeln('Введите размерность массива',n);
readln(n);
for i:=1 to n do
a[i]:=random(10)+1; readln;
for i:=1 to n do
begin if a[i]=1 then
k:=k+1;
end;
writeln('k=',k);
readln;
End.

Answer 2

Для написания программы, которая будет подсчитывать количество элементов, равных единице, вам понадобится использовать цикл и условную конструкцию. Вот пример программы на языке Python, которая решает данную задачу:

def count_ones(numbers):
    count = 0  # переменная для подсчета количества единиц
    for num in numbers:
        if num == 1:  # проверяем, равен ли текущий элемент единице
            count += 1  # увеличиваем счетчик, если элемент равен единице
    return count

# пример использования программы
numbers = [1, 2, 3, 1, 4, 1, 5, 6, 1]
result = count_ones(numbers)
print("Количество элементов, равных единице:", result)

В данном примере функция `count_ones` принимает на вход список чисел `numbers` и возвращает количество элементов, равных единице. При каждой итерации цикла проверяется, равен ли текущий элемент единице, и если да, то счетчик `count` увеличивается на единицу. В конце программы выводится результат подсчета. В данном примере результат будет равен 4, так как в списке `numbers` есть 4 элемента, равных единице.