Question

ПомогитеВ массиве 9 чисел.Числа вводятся с клавиатуры. Найти сумму кратных 13.​

Answer 1

Программа:

Pascal:

var

 arr: array[1..9] of integer;

 i, n: integer;

begin

 writeln('Введите массив: ');

 for i := 1 to 9 do begin

   readln(arr[i]);

   if arr[i] mod 13 = 0 then n := n + arr[i];

 end;

 writeln('Массив: ', arr);

 writeln('Сумма чисел, кратных 13: ', n);

end.

Answer 2

Для решения данной задачи, необходимо считать 9 чисел с клавиатуры и найти сумму чисел, которые кратны 13.

Для начала создадим массив, который будет хранить введенные числа:

int[] numbers = new int[9];

Затем, с помощью цикла for, будем считывать числа с клавиатуры и записывать их в массив:

Scanner scanner = new Scanner(System.in); for (int i = 0; i < numbers.length; i++) { System.out.print("Введите число: "); numbers[i] = scanner.nextInt(); }

Далее, создадим переменную sum, которая будет хранить сумму чисел, кратных 13, и проинициализируем ее нулем:

int sum = 0;

Теперь, с помощью цикла for-each, пройдемся по массиву numbers и будем проверять каждое число на кратность 13:

for (int number : numbers) { if (number % 13 == 0) { sum += number; } }

Наконец, выведем результат:

System.out.println("Сумма чисел, кратных 13: " + sum);

Полученная сумма будет являться ответом на задачу.