program MinProductCost;

const
numProducts = 5;

type
Product = record
name: string;
cost: real;
quantity: integer;
end;

var
products: array[1..numProducts] of Product;
minQuantityIndex: integer;
i: integer;

begin
for i := 1 to numProducts do
begin
writeln('Введите наименование продукта ', i, ': ');
readln(products[i].name);
writeln('Введите стоимость продукта ', i, ': ');
readln(products[i].cost);
writeln('Введите количество продукта ', i, ' на складе: ');
readln(products[i].quantity);
end;

minQuantityIndex := 1;
for i := 2 to numProducts do
begin
if products[i].quantity < products[minQuantityIndex].quantity then
minQuantityIndex := i;
end;

writeln('Продукт с наименьшим количеством на складе:');
writeln('Наименование: ', products[minQuantityIndex].name);
writeln('Стоимость: ', products[minQuantityIndex].cost:0:2);
writeln('Количество на складе: ', products[minQuantityIndex].quantity);
end.