impuls20125948

05.12.2020

Program Su, Cifr; Var X, Sum:=0; Sum:=Sum + X mod 10; X:=X div 10; Sum:=Sum + X mod 10 X:=X div 10; Sum:Sum + X; Write (' Сумма цифр = ' , Sum) End

Информатика

Ответить

Ответы

ksenyabobrovich7214

05.12.2020

sums = 0

x = int(input("Введите трёхзначное число: "))

sums += x % 10

x //= 10

sums += x % 10

x //= 10

sums += x

print("Сумма цифр =",sums)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Program Su, Cifr; Var X, Sum:=0; Sum:=Sum + X mod 10; X:=X div 10; Sum:=Sum + X mod 10 X:=X div 10; Sum:Sum + X; Write (' Сумма цифр = ' , Sum) End

▲

Program Su, Cifr; Var X, Sum:=0; Sum:=Sum + X mod 10; X:=X div 10; Sum:=Sum + X mod 10 X:=X div 10; Sum:Sum + X; Write (' Сумма цифр = ' , Sum) End

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Pascal.задана последовательность символов, за которой следует точка (в саму последовательность точка не входитнапечатать текст, удалив из него все цифры.

Подсчитайте объем данных передаваемых в секунду от видеопамяти к монитору в режиме 512*768 пикселей с глубиной цвета 16 битов и частотой обновления экрана 75 гц.

Написать алгоритм нахождения наибольшего элемента в одномерном массиве. элементы массива вводит пользователь (язык паскаль)

Для какого из указанных значений х ложно выражение: не ( x < 6 ) или ( ( x < 5 ) и ( x > =4 ) ) ? 1) 7 2) 6 3)5 4)4

Выполнение практической работы. Инструкция во вложенном файле.

решить 3 и 4 задания ( хотя-бы одно)

Каков информационный обьем книги из 160 страниц если для кодирования использовался аси код а на одной странице уменьшается 2100 знаков

складіть програму мовою python у якій з двох введених цілих чисел а і в (<1000) виводиться найбільше з них

2 вариант 1. Информационное сообщение объёмом 600 битов состоит из 120символов. Какова мощность алфавита, с которого записаноэто сообщение?

Определите, количество чисел k, для которых следующая программа выведет такой же результат, что и для k = 12? var k, i : longint; function f(n: longint): longint; begin f: = 3nn - 2*n; end; begi...

Program Su, Cifr; Var X, Sum:=0; Sum:=Sum + X mod 10; X:=X div 10; Sum:=Sum + X mod 10 X:=X div 10; Sum:Sum + X; Write (' Сумма цифр = ' , Sum) End

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Pascal.задана последовательность символов, за которой следует точка (в саму последовательность точка не входитнапечатать текст, удалив из него все цифры.

Подсчитайте объем данных передаваемых в секунду от видеопамяти к монитору в режиме 512*768 пикселей с глубиной цвета 16 битов и частотой обновления экрана 75 гц.

Написать алгоритм нахождения наибольшего элемента в одномерном массиве. элементы массива вводит пользователь (язык паскаль)

Для какого из указанных значений х ложно выражение: не ( x &lt; 6 ) или ( ( x &lt; 5 ) и ( x &gt; =4 ) ) ? 1) 7 2) 6 3)5 4)4

Выполнение практической работы. Инструкция во вложенном файле.

решить 3 и 4 задания ( хотя-бы одно) ​

Каков информационный обьем книги из 160 страниц если для кодирования использовался аси код а на одной странице уменьшается 2100 знаков

складіть програму мовою python у якій з двох введених цілих чисел а і в (&lt;1000) виводиться найбільше з них

2 вариант 1. Информационное сообщение объёмом 600 битов состоит из 120символов. Какова мощность алфавита, с которого записаноэто сообщение?​

Определите, количество чисел k, для которых следующая программа выведет такой же результат, что и для k = 12? var k, i : longint; function f(n: longint): longint; begin f: = 3*n*n - 2*n; end; begi...

Для какого из указанных значений х ложно выражение: не ( x < 6 ) или ( ( x < 5 ) и ( x > =4 ) ) ? 1) 7 2) 6 3)5 4)4

решить 3 и 4 задания ( хотя-бы одно)

складіть програму мовою python у якій з двох введених цілих чисел а і в (<1000) виводиться найбільше з них

2 вариант 1. Информационное сообщение объёмом 600 битов состоит из 120символов. Какова мощность алфавита, с которого записаноэто сообщение?

Определите, количество чисел k, для которых следующая программа выведет такой же результат, что и для k = 12? var k, i : longint; function f(n: longint): longint; begin f: = 3nn - 2*n; end; begi...