Var
i,s,t,koldney:integer;
begin
writeln('введите количество дней');
readln(koldney);
for i:=1 to koldney do
begin
writeln('введите температуру в ', i, ' день');
readln(t);
if t<0 then
s:=s+1;
end;
writeln('количество дней с температурой ниже 0 = ', s);
readln;
end.
А < 7 значит проходим по алгоритму. мы к а:=а+1 (2+1); и b:=b+а (0+3 (3 потому что мы к а прибавили 1)). а < 7 значит проходим по алгоритму. мы к а:=а+1 (3+1); и b:=b+а (3+4). а < 7 значит проходим по алгоритму. мы к а:=а+1 (4+1); и b:=b+а (7+5). а < 7 значит проходим по алгоритму. мы к а:=а+1 (5+1); и b:=b+а (12+6). а < 7 значит проходим по алгоритму. мы к а:=а+1 (6+1); и b:=b+а (18+7). а уже не меньше 7 оно равно 7 значит мы вышли из цикла а=7 и b=25
Відповідь:
r = lambda n: sum([float(i)/n for i in range(n+1)])
Пояснення:
В цикле но через range(n+1)!