40*16=640 символов в строках
640*8=5120 символов на 8 страницах
5120/2=2560 байт на 8 страницах
1Кбайт=1024 байт
2560/1024=2.5Кбайт
// 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
8 цветов...так как 2 в третей степени равно 8...это по формуле хартли N=2^i, где i это наши 3 бита
H 01000010 линия(2,1,2,8)
01000010 линия(2,4,7,4)
01000010 линия(7,1,7,8)
01111110
01000010
01000010
01000010
01000010
Л 00011000 линия(1,8,4,1)
00011000 линия(8,8,5,1)
00100100
00100100
01000010
01000010
10000001
10000001
Т 11111111 линия(1,1,8,1)
00011000 линия(4,8,4,1)
00011000 линия(5,8,5,1)
00011000
00011000
00011000
00011000
00011000