Информатика, опубликовано 2018-08-22 23:35:27 by Гость
13. Напишите программу находящую сумму квадратов чисел от 1 до N. Где N вводится с клавиатуры.
Ответ оставил Гость
Var n,s,i:integer;
begin
write(n=);readln(n);
s:=0;
for i:=1 to n do s:=s+i*i;
writeln(s=,s)
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.