Технический форум - Помогите записать формулу в Паскале

Технический форум (http://www.tehnari.ru/index.php)

- Delphi, Kylix and Pascal (http://www.tehnari.ru/forumdisplay.php?f=43)

- - Помогите записать формулу в Паскале (http://www.tehnari.ru/showthread.php?t=96373)

Ivan66

16.05.2014 20:17

Помогите записать формулу в Паскале

Помогите записать формулу в паскале y=x1*x3+x3*x5+x5*x7...

Vladimir_S

16.05.2014 20:24

Цитата:

Сообщение от Ivan66 (Сообщение 1032537)

Помогите записать формулу в паскале y=x1*x3+x3*x5+x5*x7...

Пожалуйста.
y:=0;
for i:=1 to N do y:=y+x[2*i-1]*x[2*i+1];

Часовой пояс GMT +4, время: 23:12.