Ответ(ы) на вопрос:
Гость1.var a,b:integer;
begin
readln(a);
b:=0;
for var i:=1 to a then b:=b+sqr(i);
write(b);
2.
begin
readln(a);
b:=0;
for var i:=1 to a then b:=b+sqr(i);
write(b);
2.
Не нашли ответ?
Похожие вопросы