ДАЮ 50 БАЛЛОВ!!!!!!!!!!Дано натуральное число A , большее 9 , в
ДАЮ 50 БАЛЛОВ!!!!!!!!!!
Дано натуральное число A , большее 9 , в записи которого нет нулей . Нужно отыскать максимальное двузначное число , которое можно узреть в записи числа A . К примеру , для числа 18943 ответом будет число 94.
Program n_1;
uses math;
var i, n, m, a, kol, j:int64;
begin
readln(n);
kol:=0;
a:=n;
while alt;gt;0 do begin
a:=a div 10;
kol:=kol+1;
end;
m:=n mod 100;
for i:=1 to kol-1 do begin
if((n div 10) mod 100 gt; m) then m:=(n div 10) mod 100;
n:=m div 10;
end;
writeln(m);
end.
Решение чисто математическое. Думаю через строковый тип данных работать будет намного проще.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.