Сформировать в программе массив из целых чисел от 2 до N. Подсчитать сумму квадратов четных и сумму квадратов нечетных чисел

@Andreika24 · Регистрация: 19.11.2013

Студворк — интернет-сервис помощи студентам

Сформировать в программе массив из целых чисел от 2 до N. Подсчитать сумму квадратов четных и сумму квадратов нечетных чисел.

@Alexxandr · 19.11.2013, 13:11

Вам в раздел Фриланс, тем более, что Вы создали аж пять тем.

@ildwine · 19.11.2013, 13:48

Не по теме:

Сообщение от Alexxandr

Вам в раздел Фриланс, тем более, что Вы создали аж пять тем.

Не обязательно, ТС правильно оформил темы, задачи несложные, вполне вероятно рассчитывать на бесплатную помощь.

@Alexxandr · 19.11.2013, 14:24

Не по теме:

Ог, поможем ;-)

Pascal

var A: array of integer;
n: integer;
i: integer;
sumodd, sumnotodd: integer;
sumodd := 0;
sumnotodd := 0;
SetLength(A,N-1);
for i:=0 to n-2 do
begin
 A[i] := i + 2;
 if (A[i] mod 2) = 0 then sumodd := sumodd + A[i]*A[i] else
 sumnotodd := sumnotodd + A[i]*A[i]
end;

@Andreika24 · 19.11.2013, 15:10 **[ТС]**

Спасибо, большое)

@Andreika24 0 / 0 / 0 Регистрация: 19.11.2013 Сообщений: 149
		1
	Сформировать в программе массив из целых чисел от 2 до N. Подсчитать сумму квадратов четных и сумму квадратов нечетных чисел 19.11.2013, 13:11. Показов 2222. Ответов 4 Метки нет (Все метки) Сформировать в программе массив из целых чисел от 2 до N. Подсчитать сумму квадратов четных и сумму квадратов нечетных чисел. 0

@Alexxandr 143 / 52 / 17 Регистрация: 12.11.2013 Сообщений: 162
	19.11.2013, 13:11	2
	Вам в раздел Фриланс, тем более, что Вы создали аж пять тем. 0

@ildwine
	19.11.2013, 13:48 #3
	Не по теме: Сообщение от Alexxandr Вам в раздел Фриланс, тем более, что Вы создали аж пять тем. Не обязательно, ТС правильно оформил темы, задачи несложные, вполне вероятно рассчитывать на бесплатную помощь. 0

@Andreika24 0 / 0 / 0 Регистрация: 19.11.2013 Сообщений: 149
	19.11.2013, 15:10 [ТС]	5
	Спасибо, большое) 0

Опции темы