Как найти сумму цифр четырехзначного числа - Исправление недочетов и поиск решений вместе с Examum.ru

Андрей Нилл

@AndreyNill

Новичок в сфере программирования

Найти сумму цифр четырёхзначного числа, поможете?

Дано четырёхзначное число. Найдите сумму его цифр.
Примеры
Ввод
Вывод
2020
4
Пример нахождения трёхзначного числа:
x = int(input())
x1 = x//100
x2 = (x//10)%10
x3 = x%10

Делать так же по этому примеру, операторы выше уровнем сайт не принимает

Вопрос задан

более трёх лет назад
9331 просмотр

print(sum(map(int, list(input()))))
Для любого кол-ва цифр в числе

Пригласить эксперта

number = str(input('Введите число: '))
sum_ = 0
for char in number:
    sum_+= int(char)
print(sum_)

работает с любыми числами, хоть тысячизначными

Переведите это число в строку и считайте отдельные ее элементы.

x = input()
summa = 0
for i in x:
    summa += int(i)
print(summa)

Показать ещё
Загружается…

29 мая 2023, в 23:21

2000 руб./за проект

29 мая 2023, в 22:30

10000 руб./за проект

29 мая 2023, в 21:41

2000 руб./за проект

Минуточку внимания

Источник

1 / 1 / 0

Регистрация: 20.10.2009

Сообщений: 20

найти сумму цифр заданного четырехзначного числа

22.12.2009, 13:09. Показов 46038. Ответов 1

еще три задачки
1) Для матрицы размером NxM вывести на экран все ее седловые точки. Элемент матрицы называется седловой точкой, если он является наименьшим в своей строке и одновременно наибольшим в своем столбце, или наоборот.
2) В матрице n-го порядка переставить строки так, чтобы на главной диагонали матрицы были расположены элементы, наибольшие по абсолютной величине.
3) найти сумму цифр заданного четырехзначного числа

кот Бегемот

Платежеспособный зверь

8818 / 4245 / 1618

Регистрация: 28.10.2009

Сообщений: 11,386

22.12.2009, 13:21

Сообщение было отмечено как решение

Решение

найти сумму цифр заданного четырехзначного числа

Pascal

var
a,s:integer;
begin
readln(a);
repeat
s:=s+a mod 10;
a:=a div 10;
until a=0;
writeln(s);
end.

или

Pascal

var
a,s,i:integer;
begin
readln(a);
for i:=1 to 4 do
begin
s:=s+a mod 10;
a:=a div 10;
end;
writeln(s);
end.

или

Pascal

var
a,s:integer;
begin
readln(a);
s:=a div 1000+(a div 100)mod 10+(a div 10)mod 10+a mod 10; 
writeln(s);
end.

Источник

Partial Answer

As $x=999a+90b-90c-999d=9(111a+10b-10c-111d)$ then $xequiv0pmod{9}$. Looking at cubes modulo 9 we see:

$0^3equiv0pmod{9}$, $1^3equiv1pmod{9}$, $2^3equiv8pmod{9}$, $3^3equiv0pmod{9}$, $4^3equiv1pmod{9}$, $5^3equiv8pmod{9}$, $6^3equiv0pmod{9}$, $7^3equiv1pmod{9}$, $8^3equiv8pmod{9}$, $9^3equiv0pmod{9}$.

For the four cubes to be a multiple of $9$ we require:

4 zeros $big((a,b,c,d)equiv(0,0,0,0)pmod{3}big)$, or
2 zeros, a one and an eight $big((a,b,c,d)equiv(0,0,1,2)pmod{3}big)$, or
2 ones, 2 eights $big((a,b,c,d)equiv(1,1,2,2)pmod{3}big)$

We have $999(a-d) = a^3+b^3+c^3+d^3+90(c-b)$. Next consider the maximum value this can take. This occurs when $(a,b,c,d)=(9,0,9,9)$. The right hand side in this case is equal $2997$ (with equality only if $a=d$). Thus $0le a-dle2$.

I’ll keep adding to this…

Cheating

Via computer the answer is $a=4$, $b=6$, $c=8$, $d=3$. I’ll keep thinking about how to get here without cheating.

Источник

Формулировка задачи:

Если можно, то полностью. Зарание спасибо

Код к задаче: «Найти сумму цифр введенного 4-значного числа»

textual

Листинг программы

Var s,n:integer;
Begin
    write('4-х значное число: ');readln(n);
    s:=(n mod 10)+(n div 10 mod 10)+(n div 100 mod 10)+n div 1000;
    writeln('S = ',s);
    readln;
End.

Полезно ли:

11 голосов , оценка 4.000 из 5

Похожие ответы

Вывести на экран только те суммы цифр, которых больше заданного числа
В натуральном числе n поменять местами порядок цифр для получения наибольшего числа
Найти сумму элементов массива, расположенных после минимального
Найти сумму из N групп элементов ряда
Найти, есть ли в массиве простые числа
Проверить, делится ли сумма цифр введенного двухзначного целого числа на 5
Определить количество трехзначных чисел, сумма цифр которых простое число
Определить наибольшую цифру введенного натурального числа
Дана последовательность чисел, найти в ней наименьшее число
Найти наибольшее количество цифр идущих подряд в файле
Из двух чисел получить новое путём замены чётных цифр первого числа на наибольшую цифру второго числа

Источник

в одну строчку

print(sum(i for i in range(1000, 10000) if sum(map(int, str(i))) == 20))

ну или можете сделать так

def sum_of_digits(num):
    sum = 0
    while num > 0:
        sum += num % 10
        num //= 10
    return sum

sum_number = 0
    
for number in range(1000, 10000):
    if(sum_of_digits(number)==20):
        sum_number += number

print(sum_number)

еще 1 вариант в 1 строку с использованием filter

print(sum(filter(lambda number: sum(map(int,str(number)))==20, range(1000, 10000))))

Источник