1. Информатика
  2. Напишите, , программу

Напишите, , программу в кумир (именно в кумир.) для нахождения суммы цифр числа. ((

kolpak3 kolpak3    1   16.09.2019 17:10    0

Ответы
David3464 David3464  07.10.2020 20:09
Алг
нач
цел a,sum
вывод 'введите число: '
ввод a
sum:=0;
нц пока a<>0
sum:=sum+mod(a,10)
a:=div(a,10)
кц
вывод 'сумма цифр: ',sum
кон
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
даня1003 даня1003  29.10.2020 07:57
Даны положительные числа А и В(А В).На отрезке длины А размещено максимально возможное количество отрезков длины В(без наложений).Не используя операции умножения и деления,найти количество...
eevelinka742 eevelinka742  16.06.2019 15:30
Если количество изделий более 100, но менее 200, то поставить знак ! , - если количество изделий от 10 до 100 и это автобусы, то поставить знак ? , - в остальных случаях поставить...
03021971 03021971  29.08.2019 22:10
Имеются две матрицы размером n на m заполненные случайными числами от 1 до 10, заполнить и вывести 3 матрицу, каждый элемент которой равен сумме предыдущих (паскаль) можно решение...
Наташа151515 Наташа151515  18.07.2019 16:20
Какое условие записано верно для определения четности переменной а a mod 2 = 0 a mod 2 = 1 a div 2 = 0 a div 2 = 1...
mekhronaismatov mekhronaismatov  18.07.2019 16:20
Какой объём видеопамяти необходим для хранения четырёх страниц изображения,при условии,разрешающая дисплея равна 640х480 точек,а используемых-32?...
мяустик мяустик  02.06.2019 23:48
Нужно перевести из pascal на python, ) uses graphabc,crt; var x,y,y0,ys,i,s: integer; k,q: real; begin setwindowsize(700,500); write( сколько секунд должны отсчитать часы? ); readln(s);...
Ангелмоямама Ангелмоямама  02.06.2019 23:51
1. файл f1.txt содержит 200 чисел в 5 колонок. создать программу считывания этих чисел и их вывода в файл f2.txt с сортировкой по убыванию в 8 колонок с точностью 2 знака после десятичной...
kurtenokalina2 kurtenokalina2  03.06.2019 00:06
Вычислить значение функции с точностью е (задается с клавиатуры) вычисление у оформить как функцию....
Grif69 Grif69  03.06.2019 01:40
Решить ,ну прям ни как не , логическая : в авиационном отделении служат потапов,щедрин,семенов, канавалов ,самойлов. их специальности пилот ,штурман,борт механик,радист,синоптик....
AquAlexa AquAlexa  03.06.2019 01:40
Среди чисел a, b, c определить количество чисел кратных 3. , , написать программу для turbo pascal или просто алгоритм....

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