Вопрос задан 25.09.2023 в 14:45. Предмет Информатика. Спрашивает Малыгин Леонид.

срочно!!! даю 30 баллов решите: информатика с клавиатуры вводится массив, состоящий из N целых

чисел. составьте программу, которая вычисляет сумму чисел, не превышающих 10​
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Кот Ксения.

1 var

2 a: array[1..10] of integer;

3 i,sum:integer;

4 begin

5 sum:=0;

6 write('Enter elementi: ');

7 for i:=1 to 10 do

8 read(a[i]);

9 writeln;

10 for i:=1 to 10 do

11 begin

12 write(a[i],' ');

13 sum:=sum+a[i];

14 end;

15 writeln;

16 writeln(sum);

17 readln;

18 end.

0 0
Отвечает Дедеш Александра.

var

   numbers: array[1..10] of integer;

   index, sum: integer;

begin

   writeln('Enter the array: ');

   for index := 1 to 10 do

       readln(numbers[index]);

   

   sum := 0;

   for index := 1 to 10 do

       if numbers[index] <= 10 then

           sum := sum + numbers[index];

   

   writeln(sum);

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

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

python
# Вводим массив из N целых чисел N = int(input("Введите количество чисел в массиве: ")) arr = [] for i in range(N): num = int(input(f"Введите {i+1}-е число: ")) arr.append(num) # Инициализируем сумму total_sum = 0 # Вычисляем сумму чисел, не превышающих 10 for num in arr: if num <= 10: total_sum += num # Выводим результат print(f"Сумма чисел, не превышающих 10, равна {total_sum}")

Просто скопируйте этот код и выполните его на вашем компьютере, чтобы решить задачу. Он позволяет вам ввести массив из N чисел и вычислить сумму чисел, не превышающих 10.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос