Информатика | 5 - 9 классы
Как на Pascal ABC написать программу, которая будет считать сумму цифр в числе, введенного с клавиатуры?
Количество цифр в числе не известно!
Число целочисленное!
Желательно с объяснениями ( вне программы ).
Заранее спасибо!
Напишите программу, которая вычисляет сумму цифр введенного двухзначного числа?
Напишите программу, которая вычисляет сумму цифр введенного двухзначного числа.
(Pascal).
Напишите программу, которая считает сумму цифр введенного числа(паскаль)?
Напишите программу, которая считает сумму цифр введенного числа(паскаль).
Напишите программу, которая считает количество четных цифр введенного числа?
Напишите программу, которая считает количество четных цифр введенного числа.
Составьте программу для вычисления суммы цифр введенного с клавиатуры трехзначного натурального числа?
Составьте программу для вычисления суммы цифр введенного с клавиатуры трехзначного натурального числа.
Написать программу которая выводит все двузначные числа у которых сумма цифр равна числу введенных с клавиатуры?
Написать программу которая выводит все двузначные числа у которых сумма цифр равна числу введенных с клавиатуры.
Напишите программу которая считает количество четных цифр введенного числа в паскале?
Напишите программу которая считает количество четных цифр введенного числа в паскале.
Написать программу для Pascal?
Написать программу для Pascal.
Найти произведение цифр числа введенного с клавиатуры.
Составить программу определяющую сумму цифр во введенном с клавиатуры целом числе?
Составить программу определяющую сумму цифр во введенном с клавиатуры целом числе.
Написать программу которая считает количество цифр в числе и их сумму?
Написать программу которая считает количество цифр в числе и их сумму.
Паскаль.
Число вводится с клавиатуры.
Напишите программу, которая считает сумму цифр введенного числа(c + + )?
Напишите программу, которая считает сумму цифр введенного числа(c + + ).
Вы перешли к вопросу Как на Pascal ABC написать программу, которая будет считать сумму цифр в числе, введенного с клавиатуры?. Он относится к категории Информатика, для 5 - 9 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.
Var a, b, c, d : integer ;
begin
writeln('введите число') ; / / запрос числа
readln(a) ;
d : = a ; / / это для красоты
while (a< ; > ; 0) do begin / / пока мы не дойдём до последней цифры в числе делать следующее b : = a mod 10 ; / / берём последнюю цифру числа
c : = c + b ; / / находим сумму цифр a : = a div 10 ; / / убираем из данного числа последнюю цифру end ;
writeln('сумма цифр числа ', d, ' = ', c) ; / / вывод результата
end.