Помогите написать на Паскаль

1) сумма квадратов от 1 до N

S=1+4+9 + ... n^2

Question

Информатика

Никушка

9 марта, 08:53

Помогите написать на Паскаль

1) сумма квадратов от 1 до N

S=1+4+9 + ... n^2

+1

Ответы (1)

Знаете ответ?

Улита · Answer 1

Program programma;

Uses crt;

var n, s, i: integer;

Begin clrscr;

write ('Введите число N = ') ;

readln (n) ;

write ('S=') ;

for i:=1 to n-1 do

begin

s:=s+sqr (i) ;

write (sqr (i),'+') ;

end;

s:=s+sqr (n) ;

write (sqr (n),'=', s) ;

End.

Помогите написать на Паскаль1) сумма квадратов от 1 до NS=1+4+9 + ... n^2

Помогите написать на Паскаль

1) сумма квадратов от 1 до N

S=1+4+9 + ... n^2