0 / 0 / 0
Регистрация: 20.11.2014
Сообщений: 7
1

Определить, во сколько раз последняя цифра больше первой в числе

20.11.2014, 13:01. Показов 1218. Ответов 1
Метки нет (Все метки)

Помогите составить!2. Вводится с клавиатуры число в диапазоне [1000 . . 10000]. Найти сумму цифр, составляющих число, и определить, во сколько раз последняя цифра больше первой в этом числе. Если сумма цифр превышает 13, то сообщить об этом.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.11.2014, 13:01
Ответы с готовыми решениями:

Определить сколько раз в числе встречается последняя цифра
1) Дано натуральное число. Определить сколько раз в нем встречается последняя цифра. в 1, 4, 5...

Определить, сколько раз последняя цифра встречается в целом числе
Сколько раз последняя цифра встречается в целом числе.(использовать процедуру).

Определить сколько раз в числе повторяется последняя цифра
С клавиатуры водится число! Определить сколько раз в нем повторяется последнее число! Помогите...

Определить, сколько раз в заданном числе встречается его последняя цифра
. Дано натуральное число. Определить, сколько раз в нём встречается последняя цифра.

1
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
20.11.2014, 16:05 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Function SumCifr(A : Longint) : Integer;
Begin
  If A>0 then SumCifr:=(A mod 10) +SumCifr(A div 10) else SumCifr:=0;
End;
 
Function GetNumCifr(A : Longint) : Integer;
Begin
  If A<=0 then GetNumCifr:=0 else GetNumCifr:=1+GetNumCifr(A div 10);
End;
 
Function GetNumInPos(B : Longint; N : Byte) : Byte;
Var ll : Integer;
    kk : LongInt;
Begin
  kk:=B; ll:=1;
  While ll<N do
  Begin
    Inc(ll);
    kk:=kk div 10;
  End;
  GetNumInPos:=kk mod 10;
End;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.11.2014, 16:05

Сколько раз в числе встречается цифра, равная первой?
Дано натуральное число. Определить, сколько раз в нем встречается цифра, равная первой.

Определить, сколько раз цифра встречается в числе
1. Дано n-натуральное число. Сколько раз данная цифра(ы) встречается в данном числе.N и a вводятся...

Определить, сколько раз цифра встречается в числе
Дано натуральное число. Сколько раз данная цифра А встречается в данном числе (А вводится с...

Определить, сколько раз в числе встречается цифра а
Дано натуральное число. Определить: •сколько раз в нем встречается цифра а; •сколько раз в нем...

Определить, сколько раз в числе встречается цифра 5
1.Ввести число. Определить, сколько раз в нем встречается цифра 5 2.Ввести число n. Вывести две...

Определить, сколько раз в числе встречается цифра a
3.дано натуральное число x. Сколько раз в нём встречается цифра a?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.