Составить программу, вычисляющую сумму квадратов всех чисел от 1 до 100. (В Pascal)

Question

59

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

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

renovatio · Accepted Answer

51

renovatio

03 марта 2023

var i: integer; s: real; begin s: =0; for i: =1 to 100 do s: =s+i*i; writeln (s: 7:0); end.

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

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