Системное ПО:
1,4,6,7,9
Офисное ПО:
2,3,5,8,10,11
1вг
2абг
3 б 11101110111
4в
5 501
6гвба
7б
8б
9г(переменных)
10в
11в
12 96
13 38с4
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
function MaxDigit(n:integer):integer;
begin
Result:=0;
while n>0 do begin
var m:=n mod 10;
if m>Result then result:=m;
n:=n div 10
end
end;
begin
var n1,n2:integer;
Write('Введите через пробел два натуральных числа: ');
Read(n1,n2);
Writeln('s=',MaxDigit(n1)+MaxDigit(n2))
end.
<u><em>Тестовое решение</em></u>
Введите через пробел два натуральных числа: 53252 4654083
s=13
<em><u>а) Маркированный список. </u></em>
<em><u>б) Многоуровневый нумерованный список.</u></em>
<em><u>в) Таблица.</u></em>
<em><u>г) Нумерованный список.</u></em>
<em><u>д) Многоуровневый нумерованный список.</u></em>
Насчет третьего - под б) нетривиальный метод(подстановка), но я уверен, что он правильный.