Ты не написал на каком языке программирования, но я напишу на Pascal))
var a,b,c:integer;
begin
read(a);
for a:=1 to 10 do
b:=b+a;
end;
b:=b-a;
Ты не написал на каком языке программирования, но я напишу на Pascal))
Задача №1var a,b,c:integer;
begin
read(a);
for a:=1 to 10 do
b:=b+a;
end;
Задача №2var a,b,c:integer;
begin
read(a);
for a:=1 to 10 do
b:=b-a;
end;
Вроде бы так...