Недавнее содержимое от churchilll

уже решил program A1; var i,j: integer; min:real; A:array[1..3,1..4] of real; B:array[1..3,1..4] of real; C:array[1..3,1..4] of real; begin writeln('wwedit kilkist'); for i:=1 to 3 do begin for j:=1 to 4 do readln(A[i,j]); writeln(A[i,j]); end; writeln('vvedit vartist'); for i:=1...

В паскале,очень надо

Определить низкую калькуляционную стоимость помогите решить Для изготовления 3 видов продукции используют 4 составляющие в разных количествах. Определить низкую калькуляционную стоимость. Количества и цены ввести самостоятельно Продукция1 Продукция2 Продукция3...