Question

Вычислить сумму чисел,кратных 3.Число введённых с клавиатуры чисел вводится во время работы программы.Помогите решить.

Answer 1

var a:array[1..100] of integer;

s,i: integer;

begin

for i:=1 to 10 do begin

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

readln(a[i]);  

end;

for i:=1 to 10 do begin  

if a[i] mod 3 = 0 then begin

s:=s+a[i];

end;   end;  

writeln('summa chisel kratnx 3 = ', s);

readln;

end.

Answer 2

Для решения этой задачи нужно написать программу, которая будет запрашивать у пользователя числа, проверять каждое число на кратность 3 и прибавлять его к общей сумме, если оно является кратным 3. Программа должна продолжать работу до тех пор, пока пользователь не введет специальное значение, например, 0, чтобы прекратить ввод чисел и вывести результат.

Вот пример программы на языке Python:

pythonCopy code
def sum_multiples_of_three():
    sum_of_multiples = 0

    while True:
        try:
            number = int(input("Введите число (для завершения введите 0): "))
            
            if number == 0:
                break
            
            if number % 3 == 0:
                sum_of_multiples += number
                
        except ValueError:
            print("Ошибка: Введите целое число.")
    
    print("Сумма чисел, кратных 3:", sum_of_multiples)

sum_multiples_of_three()

Эта программа будет просить пользователя ввести число до тех пор, пока он не введет 0. Если введенное число кратно 3, оно будет добавлено к сумме, иначе просто проигнорировано. После ввода 0 программа выведет сумму всех введенных чисел, кратных 3.