Ответ:
Б) 7.
Объяснение:
Смотрим на последние разряды.
4 + 3 = 7, а там 0. Следовательно, было 10, единица ушла в следующих разряд. Чтобы вместо 7 получилось 10, основание системы счисления должно быть меньше на 10 - 7 = 3 (мы же все считали в привычной десятиричной системе). От 10 отнимаем 3 и будет 7. Это и есть ответ. И не нужно ничего больше никуда переводить.
Для примера. Если бы было написано в последних разрядах 4 и 2, а результат был бы 1, мы бы рассуждали так.
4 + 2 = 6, а написано 1, т.е. это было 11. 11 - 6 = 5 (разница).
10 - 5 = 5. Значит, система по основанию 5. Быстро и легко.
DIM x(20) AS INTEGER
RESTORE
FOR i = 1 TO 20
READ x(i)
NEXT
s = 0
FOR i = 1 TO 20
IF x(i) > 0 THEN
s = s + x(i)
END IF
NEXT
PRINT "s="; s
END
DATA -3,9,-8,6,6,5,0,-7,9,18
DATA 4,-7,9,7,5,-9,-6,6,3,8
Var a,b:integer;
begin;
b:=1;
a:=1;
while a<>0 do
begin;
readln(a);
if a=0 then break;
b:=b*a;
end;
writeln(b);
<span>end.</span>