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

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

- Delphi, Kylix and Pascal (http://www.tehnari.ru/f43/)

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, время: 11:46.