Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Ввести натуральное число и определить какие цифры встречаются несколько раз Массивы использовать нельзя. Можно решать только через :

10-11 класс

For,while,if,repeat,until,else и все. Кто-нить сможет помочь??

251083b 19 сент. 2014 г., 2:29:09 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Amina0072003
19 сент. 2014 г., 3:55:16 (9 лет назад)

program zifry;
var n,nn,i,j,k:integer;
begin
write('Введите число: ');
readln(n);
for i:=0 to 9 do
begin
k:=0;
nn:=n;
while nn<>0 do
begin
j:=nn mod 10;
if j=i then inc(k);
nn:=nn div 10;
end;
writeln('цифра ',i,' встречается ',k,' раз');
end;
end.

Ответить

Другие вопросы из категории

Помогите,пожалуйста:

1.Перевести в двоичную систему счисления :7756;4258;5568.
2.Перевести в десятичную систему счисления:100101,001(2);101111,1101(2);10101,01(2)
3.Выпишите целые десятичные числа ,принадлежащие следующему промежутку [101101(2),110000(2)]
4.В классе 1111(2)-девочек и 1100(2)-мальчиков .Сколько учеников в классе.Ответ в двоичной системе счисления.

Читайте также

4 задачи: ввести натуральное число и определить, верно ли, что сумма цифр равна 10 (через repeat и until)//// ввести натуральное

число и определить, какие цифры встречаются несколько раз (через repeat и until)///

ввести целое число и найти сумму его цифр (через while)

ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)

всё через паскаль абс

1)Ввести целое число и найти произведение его четных цифр. Пример: Введите целое число: 1234. Произведение четных цифр числа 1234 равно

6.

2)Ввести целое число и определить количество черных и нечетных цифр.

Пример:

Введите целое число :12547

количество нечетных цифр:3

количество четных цифр:2

Всем привет! Помогите пожалуйста по информатике. Задача: ввести целое число и найти сумму его цифр. Пример: введите целое число:1234. Сумма цифр числа 1

234 равна 10. Задача: сумма цифр ввести целое число и определить верно ли, что в его записи есть 2 одинаковые цифры. Пример: введите целое число 1234 нет введите целое число 1224 да

Срочно!!!!

ввести натуральное число и определить, верно ли, что сумма цифр равна 10

Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ

0,если их несколько то номер крайней правой.

2) Дано натуральное число. Определить сумму m его последних цифр

3)Дано натуральное число. определить его максимальную цифру.

4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2

5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число



Вы находитесь на странице вопроса "Ввести натуральное число и определить какие цифры встречаются несколько раз Массивы использовать нельзя. Можно решать только через :", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.