сервис вопросов и ответовNНайти сумму цифр целого числа А (вводится с клавиатуры). составить программу на Паскале
5-9 класс|
|
Dzhansatov29
03 окт. 2013 г., 12:05:07 (10 лет назад)
Дана666
03 окт. 2013 г., 12:37:13 (10 лет назад)
var
n, sum : longint;
begin
read (n);
sum := 0;
while n > 9 do
begin
sum := sum + n mod 10;
n := n div 10;
end;
sum := sum + n;
writeln (sum);
end.
Ответить
Другие вопросы из категории
помогите плиз)
Дан целочисленный массив из 31 элемента, в котором записаны значения температуры воздуха в марте. Элементы массива могут принимать значения от (-20) до 20. Опишите на русском языке и на языке Паскаля алгоритм, который подсчитывает и выводит среднюю температуру почетным дням месяца.
Помогите пожалуйста)
1.Составьте программу ввода с клавиатуры элементов массива a[1..10] и вывода на экран элементов с четными значениями и четными индексами.
Пример ввода:4 5 6 3 9 8 4 10 7 2
2.Составьте программу,которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы,значения которых больше 5 и меньше 15.
Читайте также
Паскаль! Дано число. Умножить его на 9 (один раз). Получить сумму его цифр. Т.е. доказать, что сумма цифр этого числа будет равна 9. (В первом раскладе
или во втором сумма цифр этого числа будет равна 9.)
Заполните массив с клавиатуры целыми числами и найдите сумму элементов массива с i1-го по i2-й (i1 и i2 вводить с клавиатуры).
Входные данные:
в первой строке целое число n (0 < n ≤ 100) - кол-во элементов в массиве и целые числа i1 и i2 (0 < i1, i2 ≤ 100). Во второй строке целые числа Х1, Х2,..,Хn разделенные пробелом (числа по модулю не превосходят 32000) - значения элементов массива.
Выходные данные:
сумма элементов массива c номерами от i1 до i2.
(Написать программу на Паскале)
напишите программу которая ищет два таких натуральных числа в интервале от 1 до 100, что первое число меньше второго на 9, а сумма цифр первого числа
больше суммы цифр второго тоже на 9
плз помогите.. составить программу на языке авс паскаль 1)напишите программу, которая считывает два целых числа a и b
и выводит наибольше значение из них. Числа - целые от 1 до 1000.
при решении задачи можно пользоваться только целочисленными арифметическими операциями +,-,*,//,%,=. нельзя пользоваться нелинейными конструкциями:ветвления, циклами, функциями вычисления модуля, извлечения квадратного корня., и условными функциями!!!!!!!
2) Дано целое число N. Выведите следующее за ним четное число. При решении задачи нельзя использовать условную инструкцию if и циклы!!
хотя бы формулу:) заранее спасибо)
Вы находитесь на странице вопроса "NНайти сумму цифр целого числа А (вводится с клавиатуры). составить программу на Паскале", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.