Есть ответ 👍

Составить программу вычисления суммы квадратов чисел от 1 до n.

191
351
Посмотреть ответы 2

Ответы на вопрос:

ninikogordu
4,7(48 оценок)

Var i,x,n: integer; begini: =1; writeln('vvedit n'); readln(n); if n mod 2 = 0 then beginrepeatx: =i*i+x; i: =i+1; until i> n; endelse beginrepeatx: =i*i*i+x; i: =i+1; until i> n; end; writeln(x); readln; end.
silonte
4,4(79 оценок)

за 18 с половиной минут

Объяснение:

1000000/900/60≈18,5

Популярно: Информатика