Прогоном.
a=3 => x больше 64 и не более 511 (первое число, при котором с условием x mod 8>0 цикл запускается 3 раза и 511 последнее из таких чисел)
сам искомый иск наименьший = 106
Var n,sum,pr,a:integer;
begin
readln(n);
sum:=0
pr:=1;
while n<>0 do
begin
a:=n mod 10;
sum:=sum+a;
pr:=pr*a;
n:=n div 10;
end;
writeln(sum,' ',pr);
end.
Необходимо щёлкнуть ЛКМ(левой кнопкой мышью) и выбрать необходимый файл, который вам понадобился.
17.
<span>c. =H7+сумм(B8:C9)</span>
19.
<span>e.
101010</span>
20.
<span>b. 0000 0000 0110 0100</span><span>
</span>