8
Объяснение:
Поскольку в задании максимальная цифра 7, то это означает что вообще минимально возможная система счисления для этого примера - восьмеричная (потому что в семеричной с.с. цифры 7 быть не может)
Её и проверим переводом в десятичную систему счисления::
74₈ = 7∙8¹+4∙8⁰ = 56+4 = 60₁₀
47₈ = 4∙8¹+7∙8⁰ = 32+7 = 39₁₀
143₈ = 1∙8²+4∙8¹+3∙8⁰ = 64+32+3 = 99₁₀
получаем что 74₈+47₈=143₈ и это то же самое что 60₁₀+39₁₀=99₁₀ - равенство верное, значит исходный пример действительно написан в восьмеричной системе счисления.
Объяснение:
1)
var a,b,x,i:integer;
begin
readln(a);
x := 0;
for i := 1 to a do
begin
readln(b);
if (b div 100 > 0) and (b div 100 < 10) and (b mod 2 = 0) then
x := x+b;
end;
if x <> 0 then
writeln(x)
else
writeln('NO')
end.
2)
var a,b,x,i,c:integer;
begin
readln(a);
x := 0;
c :=0;
for i := 1 to a do
begin
readln(b);
if ((b mod 10 = 4 ) or (b mod 100 = 4)) and (b mod 8 = 0 ) then
begin
c:=c+b;
x := x+1;
end;
end;
writeln(c/x);
writeln(x)
end.