2. составьте алгоритм решения следующей задачи: вычислить расход семьи на покупку продуктов питания на неделю. (вам не надо считать сумму в деньгах). вы должны предложить алгоритм расчета. в алгоритме используйте следующие обозначения: ц - цена за 1 шт.товар, ст - стоимость, к - количество товара, ост - общая стоимость. ст=ц*к 3. какую команду надо добавить в этот алгоритм, чтобы можно было рассчитать расход на месяц?
program max_elementarray ;
var i, max : integer ;
a : array [1..10] of integer;
begin
for i : = 1 to 10 do
begin
readln(a[i]);
end;
max : = a[1];
for i : = 2 to 10 do
if a[i]> max then max : = a[i];
writeln('max element of array = ',max) ;
readln ;
end.