сервис вопросов и ответовкак составить программу, которая определяет является ли сумма цифр введённого целого трёхзначного числа четным числом?
5-9 класс|
|
Krosh1234
09 апр. 2015 г., 4:52:49 (9 лет назад)
70ifomup
09 апр. 2015 г., 6:53:59 (9 лет назад)
var
sum,n,n1,n2,n3:integer;
begin
readln(n);
n1:=n div 100;
n3:=n mod 10;
n2:=(n mod 100) div 10;
sum:=n1+n2+n3;
if sum mod 2 = 0 then
writeln("Четное")
else
writeln("Не четное");
end.
Ответить
Другие вопросы из категории
1.Дан одномерный целочисленный массив. Найти числа, которые при делении на 3 и 5 дают одинаковые остатки, посчитать их количество. Если
такий чисел нет, то вывести соответствующее сообщение.
1.Д
Каким термином называется концептуальная структура персонального компьютера, от которой зависит, каким образом будет проводиться обработка
информации, а также принципы взаимодействия технических средств и программного обеспечения? Это понятие в широком смысле определяется также как искусство проектирования различных сооружений.
перед вами китайские счет-суаньпань на которых отложены различные числа на картинке слева-число 16317 а какое число показано на картинке справа? Из
кита за 6 класс Вложение внутри
В записанном ниже алгоритме используется переменные a и b. Определите значение а после выполнения алгоритма.
а:= 10
b:= 120
b:= 132+b/а
а:= b/12*a
Читайте также
Составьте программу,которая определяет,является ли сумма цифр введенного целого трехзначного числа четным числом.
Пример ввода:567.
Пример вывода:сумма цифр числа 567-четное число
1)Составьте программу,которая заполняет массив e[1..11] случайными целыми числами в диапазоне от -15 до 1 и находит количество элементов кратных 5.
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
4 а) составьте программу ,которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 10 , затем элементы с четными индексами
удваиваются , а элементы с нечетными индексами утраивает.Выведите на экран исходный и полученный массив.
б)составьте программу ,которая заполняет массив b[1..8 ] случайными целыми числами в диапозоне от 1 до 10 , затем изменяет знак элементов с четными индексами на противоположный .Выведите на экран исходный и полученный массивы.
5) а)составьте программу ,которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 10 ,и находит количество элементов ,которые больше своего соседа слева
б)составьте программу ,которая заполняет массив b[1..8 ] случайными целыми числами в диапозоне от 1 до 10 и находит количество пар элементов с четными значениями.
6) а)составьте программу ,которая заполняет массив а[1..20 ] случайными целыми числами в диапозоне от 1 до 10 ,и находит среднее арифметическое элементов с четными значениями и нечетными индексами.
б) составьте программу ,которая заполняет массив b[1..15 ] случайными целыми числами в диапозоне от 1 до 20 и выводит все тройки элементов , упорядоченные строго по возрастанию.
напишите хоть какое нибудь нужно к завтрому срочно
№1 Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и вычисляет произведение массива с четными
значениями. №2 Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 до 10 и вычисляет среднее арифметическое элементов массива. №3 Такое же как и №2, только ...элементов массива с четными значениями.
Вы находитесь на странице вопроса "как составить программу, которая определяет является ли сумма цифр введённого целого трёхзначного числа четным числом?", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.