Как посчитать в цикле стоимость заказа в Delphi?

Question

[Владимир Кай]

Добрый день!

Может кто поможет..ну или направит.

Есть массив товаров - T с нижним индексом i
Количество товаров обозначается - N
Стоимость товаров в заказе - P1
Стоимость доставки - P2(Определяется отдельно и будем считать что она уже посчитана)
Суммарная стоимость - P

Требуется в цикле определить общую сумму заказа, путем умножения количества каждого товара на его стоимость.
Ну и в конце сложить P1 и P2, получая P.

Как это организовать в цикле? Может нужно ввести еще переменные?
И как примерно это будет выглядеть в Delphi?

Answer 1

[leremin]

за циклом переменная sum=0, проходите циклом по коллекции и в каждой итерации sum += P

Answer 2

[xmoonlight]

P=[E(i=0,N-1)]T*N+P2
(E - знак суммы)

Comments

[Владимир Кай]

Эмм.. Что-то не понимаю

[xmoonlight]

Владимир Кай: 3 штуки одного и 2 штуки другого, в T - стоимость единицы товара.
P=T[0]*3+T[1]*2+P2

Answer 3

[kalapanga]

Направить разве что в среднюю школу можно. Задачка-то оттуда. Если с языком программирования проблема, то Вы хоть что-то сами напишите, попробуйте. Если не заработает, посмотрим и поправим.

Answer 4

[Владимир Кай]

program Massiv;

var 
T: array [i..j] of integer; 
i, j, N: integer;

P, P1, P2: integer; 

begin

P2 := 300;

    for i := 0 to j do
        begin
        
        P1 := T[i]*N;
        i := i+1;
        end;
   
P := P1 + P2;
end.

Comments

[kalapanga]

Ну и чего, почти получилось. Вы это в какой-то среде (Паскаль, Дельфи) делаете или на бумажке? Просто компилятор Вам должен был уже на все ошибки указать. Для начала объявление массива. I и J здесь не годятся. Они же ещё не имеют никаких значений. Нужно указать минимальный и максимальный индекс массива:
T: array [0..99] of Integer;
это массив из 100 элементов.
В цикле увеличивать переменную i не нужно, это оператор цикла сам сделает.
По логике задачи N пожалуй тоже массив. Если в T у Вас цена товара, то в N количество этого товара в заказе. Не обязательно же всех товаров одинаковое количество должно быть.
Ну и чтобы программа чего-то сосчитала, нужно элементам массивов какие-то значения присвоить.