Помогите пожалуйста вычислить значение величины в паскале

Question

60

в избранное ссылка

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

dendenych · Accepted Answer

75

dendenych

17 апреля 2023

program z1; uses CRT; var i,s: integer; beginfor i: =1 to 20 doif i=1 then s: =s+sqr (i) else s: =s+sqr (i-1)*i); writeln (s,'); readln; end.

комментировать

в избранное ссылка отблагодарить