Технический форум - Вычислить скалярное произведение

Цитата:

Сообщение от Dima007 (Сообщение 1086506)

Что Вы можете сказать об этом? Правильно ли?)))

Почти. Всё правильно, за исключением вот этого:

Код:

for i := 1 to 3 do

f or j := 1 to 3 do

q[i] := p[i] + z[i];

1. Пробел в служебном слове "for" НЕДОПУСТИМ.
2. Этот цикл по j тут вообще ни нафиг не нужен.
Вывод: вторую строку УДАЛИТЬ!