Давид
4 год назад
Входные данные : Вводится единственое натуральное число n , не превосходящее 100 Необходимо ввести вычислительную сумму
ОТВЕТЫ
Дамян
Oct 24, 2020
program npow2;
var
n, i, s: integer;
begin
readln(n);
s := 0;
for i := 1 to n do
s := s + i * i;
writeln(s);
end.
var
n, i, s: integer;
begin
readln(n);
s := 0;
for i := 1 to n do
s := s + i * i;
writeln(s);
end.
731
Смежные вопросы:
