Python 3:
k = 0
for a in range(10, 100):
[tab] for b in range(10, 100):
[tab] [tab] if ((a+b)<=100):
[tab] [tab] [tab] k+=1
[tab] [tab] [tab] print('k=', k)
P.S. один [tab] - 4 пробела
Pascal
var
x,y : integer;
begin
readln (x,y);
if (x=0) or (y=0)
then
begin
if x = 0 then
writeln ('Точка лежит на оси y');
if y = 0 then
writeln ('Точка лежит на оси x')'
end
else
begin
if (x>0) and (y>0) then
writeln ('Точка находится в первой четверти');
if (x<0) and (y>0) then
writeln ('Точка находится во второй четверти');
if (x<0) and (y<0) then
writeln ('Точка находится в третей четверти');
if (x>0) and (y<0) then
writeln ('Точка находится в четвертой четверти');
end;<span>
end.</span>
В 32-символьном алфавите на 1 символ необходимо log(2)32=5 бит.
На 20 символов: 20*5=100 бит
5СС
количество трёхзначных чисел (5сс) = 444-100+1;
444 (5сс) =4*5^2+4*5+4=100+24=124 (10cc)
100 (5cc)= 25 (10cc)
124-25+1=120 трёхзначных чисел в 5(сс)