Ввести 10-значное число. определить максимальную цифру в записи числа и его количество вхождений в записи числа (например, в числе 44024 максимальная цифра 4 и количество его вхождений равно 3).
BOILHbIU
1
28.04.2019 22:59
1
Другие вопросы по теме Информатика
fomenko6
13.12.2021 21:23
Ира0386
13.12.2021 21:22
soneta991
13.12.2021 21:21
Карик007
13.04.2020 21:26
Vjjiychyuy
12.03.2019 05:20
АрТёМкА945
07.09.2019 16:40
Злата5015
07.09.2019 16:40
Популярные вопросы
- 2. Як зменяцца абсалютная і адносная вільготнасці паветра ў памяшканні...
1 - Уже второй раз прикрепляю((( за решение......
3 - Read the text and match the headings (A-G) to the paragraphs (1-5). There...
3 - На карте(любой карте) красным цветом обозначьте области нарушающие проявление...
2 - У подавляющего числа рек питания А) смешанное Б) дождевое В) снеговое...
1 - с какого времени в Индии начинают складываться землявладельческие отношения...
2 - ПЕРЕВЕДИТЕ Холодное сердце Вероятно, каждого ребенка в детстве занимает...
2 - Напишите уравнения реакций получения сульфита гидроксомеди (1I) и гидросульфида...
2 - Яке значення для людини мають осетрові риби?...
1 - 3 Read the story and answer the questions below. On the first day of...
1
ответ:program сам придумай название;
var a,b,c,d,k:integer;
begin
readln(a);
b:=0;
c:=0;
d:=0;
k:=1;
for b:=0 to 10 do
begin
c:=a mod 10;
if (c<>0) then
if (c>d) then
d:=c else
if (c=d) then
k:=k+1;
a:=a div 10;
end;
writeln (d,' ',k);
end.