
Anayasius
6 год назад
Составить программу,которая вычисляет сумму от -10 до n
ОТВЕТЫ

Демьян
Jul 4, 2019
Var i,b,n:integer;
begin
readln(n);
for i:=-10 to n do
b:=b+i;
writeln(b);
end.
begin
readln(n);
for i:=-10 to n do
b:=b+i;
writeln(b);
end.
228
Смежные вопросы: