Ответ(ы) на вопрос:
Гость Program primer;
Var
i,z,a:integer;
begin
read (z);
for i:=10 to z do
a:=a+i;
writeln(a);
end.
Не нашли ответ?
Похожие вопросы