Ответ:
ответ под буквой в я уверен
N-витки цикла
n:0,1,2, 3, 4, 5, 6, 7, 8
а:1,2,4, 8, 16,32, 64,128,256
b:1,3,7,15,31,63,127,255,511
Ответ: 511
Ты прости меня если не чуточку на фото не понимаешь что написано, но это правильно) разберись
Счетчик задан от 13 до 16.
Значит s увеличится на 14 четыре раза (13, 14, 15, 16);
s = 4 * 14 = 56
program raf105;
var a,b,sum,nsum,nkol:integer;
sari:real;
begin
write('Введите число: ');
readln(a);
while a<>0 do
begin
b:= a mod 10;
a:= (a-b) div 10;
sum:= sum+b;
if (b mod 2)<>0
then
begin
nsum:= nsum+b;
nkol:= nkol+1;
end;
end;
sari:= nsum/nkol;
writeln('Сумма всех цифр в числе: ',sum);
writeln('Среднее арифметическое нечётных цифр в числе: ',sari);
end.
<u><em>Язык программирования PascalABC</em></u>