одномерные массивы - Помощь студентам

KIRILOW · 21.11.2012, 13:32

Даны действительные числа а(1),а(2),...а(30)
Вычислить y=а(1)*а(30) - а(2)*а(29) + а(3)*а(28) - .. -а(30)*а(1)

VIK_aka_TOR · 21.11.2012, 13:43

Код:

y:= 0;
for i:=1 to n do
begin
  if odd(i) then
    y := y + a[i] * a[n + 1 - i]
  else
    y := y - a[i] * a[n + 1 - i];
end;

где n = 30

KIRILOW · 21.11.2012, 13:50

а блок схему сможешь написать?

VIK_aka_TOR · 21.11.2012, 13:58

Цитата:

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

а блок схему сможешь написать?

может за вас её еще и сдать?
не вижу никакой причины делать все полностью за вас...

p.s. советую задуматься о смене специальности, если это у вас профильный предмет...

21.11.2012, 13:32	#1
KIRILOW Форумчанин Регистрация: 28.10.2012 Сообщений: 118	одномерные массивы Даны действительные числа а(1),а(2),...а(30) Вычислить y=а(1)а(30) - а(2)а(29) + а(3)а(28) - .. -а(30)а(1)

21.11.2012, 13:43	#2
VIK_aka_TOR Участник клуба Регистрация: 30.01.2011 Сообщений: 1,578	Код: `y:= 0; for i:=1 to n do begin if odd(i) then y := y + a[i] * a[n + 1 - i] else y := y - a[i] * a[n + 1 - i]; end;` где n = 30 пишу код не только за печеньки

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Одномерные массивы, двумерные массивы, строки	Sand093	C++ Builder	11	20.05.2012 21:48
одномерные массивы	Crazy123	Помощь студентам	0	04.05.2010 13:53
Даны одномерные массивы А и В. Сформировать массивы, состоящие из элемент	LyaLya	Помощь студентам	15	20.12.2009 14:12
Одномерные массивы!!!!!	SLAVIK_71	Паскаль, Turbo Pascal, PascalABC.NET	4	10.06.2009 10:41
C++ Одномерные массивы.	rus_rock_no_dead	Помощь студентам	1	20.01.2009 15:31

21.11.2012, 13:50	#3
KIRILOW Форумчанин Регистрация: 28.10.2012 Сообщений: 118	а блок схему сможешь написать?