Ответы
Ответ дал:
1
var i,b,s:integer;
begin
write('b = '); readln(b);
s:=0;
for i:=-10 to b do s:=s+i;
writeln('s = ',s);
end.
Пример:
b = 5
s = -40
begin
write('b = '); readln(b);
s:=0;
for i:=-10 to b do s:=s+i;
writeln('s = ',s);
end.
Пример:
b = 5
s = -40
Похожие вопросы
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад