сервис вопросов и ответов1)Определить сумму и кол-во цифр числа 2)Определить явл-ся ли число простым(если делится только на 1 и на самого себя) в Delphi7
10-11 класс|
|
T10042003
04 дек. 2016 г., 16:14:07 (7 лет назад)
Gfullbuster
04 дек. 2016 г., 17:40:46 (7 лет назад)
1. while (n > 0) do begin inc(c); inc( s, n mod 10); n := n div 10; end;
2. fl := true; for i := 2 to n div 2 do if (n mod i = 0) then begin fl := false; break; end; if (fl) then простое.
Ответить
Другие вопросы из категории
определите соответствия Блез Паскаль Германия Арифмометр
Готфрид Вильгельм Лейбниц Англия Табулятор
Чарльз Бейбидж США Паскалина
Герман Холлерит Франция Аналитическая машина
Читайте также
Сумма цифр. Даны два числа А и В. Подсчитайте кол-во натуральных чисел на отрезке от А до В , сумма цифр которых четна. Программа
получает на вход два натуральных числа А и В, не превосходящих 10^9^ А<=В . Программа должна вывести одно число - кол-во натуральных чисел, больше или равных А и меньших или равных В, сумма цифр которых четна.
Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
1.Дано двузначное число.Определить: a.какая из его цифр больше,первая или вторая; b. одинаковы ли его цифры. 2. Дано двухзначное число.
Определить,равен ли квадрат этого числа учетверённой сумме кубов его цифр. Например, для числа 48 ответ положительный, для числа 52-отрицательный. 3. Дано двузначное число. Определить: a. кратна ли трём сумма его цифр b. кратна ли сумма его цифр числу a. 4. Дано трёхзначное число Определить,равен ли квадрат этого числа сумме кубов его цифр. 5. Дано двузначное число,определить:входит ли в него цифра 3: входит ли в него цифра a.
ПАСКАЛЬ АБС!! 10 КЛАСС! СРОЧНО!! Дан массив А(n). Определите кол-во нечетных элементов массива, стоящих на четных местах. Выведите на
экран исходный массив и найденное кол-во.
В некотором натуральном числе n посчитать кол-во цифр.
Пожалуйста помогите!
Вы находитесь на странице вопроса "1)Определить сумму и кол-во цифр числа 2)Определить явл-ся ли число простым(если делится только на 1 и на самого себя) в Delphi7", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.