Даны числа а1, a2, …, а10. Определить сумму их квадратов. - Помощь студентам

Maks:// · 22.01.2009, 15:18

Даны числа а1, a2, …, а10. Определить сумму их квадратов

Stilet · 22.01.2009, 15:24

Цитата:

1.Даны числа а1, a2, …, а10. Определить сумму их квадратов.

Код:

For i:=1 to 10 do summ:=summ+sqr(a[i]);

22.01.2009, 15:18	#1
Maks:// Регистрация: 22.01.2009 Сообщений: 4	Даны числа а1, a2, …, а10. Определить сумму их квадратов. Даны числа а1, a2, …, а10. Определить сумму их квадратов

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Даны натуральные числа n,p, целые числа a1 , ... ,an.	Наталья111	Фриланс	10	09.11.2010 20:09
Найти сумму квадратов отрицательных элементов массива	bbk_serg	Помощь студентам	7	21.01.2009 12:33
Даны натуральные числа m,n. Посчитать сумму m последнего числа n.	лялька	Паскаль, Turbo Pascal, PascalABC.NET	6	25.12.2008 15:22
Даны 3 точки определить треугольник.	soldm	Помощь студентам	14	06.10.2008 14:43
ДАНЫ 4 ЧИСЛА X Y Z W составит программу найти произведение все положительные нечетные числа	Woland-itn	Паскаль, Turbo Pascal, PascalABC.NET	3	23.03.2008 21:49