Задание 6. В массиве находится информация о цене 20 товаров в магазине (случайные числа от 1 до 50). С клавиатуры вводится количество товаров, которое покупатель приобретает, а также номера приобретаемых товаров. Создайте программу для определения общей стоимости покупки. (Pascal ABC)
Skvorec
Конечно! Для решения задачи вам понадобится написать программу на языке Pascal. Вот пошаговое решение:
1. Объявите и инициализируйте массив цен товаров. В вашем случае у вас уже есть массив с информацией о ценах товаров.
2. Спросите у пользователя количество товаров, которое он хочет приобрести, и номера товаров, которые он собирается купить. Для этого используйте команды `ReadLn` или `Read` для ввода чисел.
3. Создайте переменную `общая_стоимость` и инициализируйте ее значением 0. Эта переменная будет использоваться для подсчета общей стоимости покупки.
4. С помощью цикла `for` переберите номера товаров, указанные пользователем. Для каждого номера найдите соответствующую цену товара из массива и добавьте ее к общей стоимости. Например:
- Предположим, что пользователь хочет приобрести 3 товара с номерами 2, 4 и 6.
- Используя цикл `for`, переберите эти номера (2, 4, 6).
- Для каждого номера найдите цену товара в массиве и добавьте ее к `общая_стоимость`.
5. Выведите на экран общую стоимость покупки, используя команду `WriteLn` или `Write`.
Вот пример кода на языке Pascal:
Эта программа позволит вам определить общую стоимость покупки на основе введенных пользователем количества товаров и номеров товаров.
1. Объявите и инициализируйте массив цен товаров. В вашем случае у вас уже есть массив с информацией о ценах товаров.
2. Спросите у пользователя количество товаров, которое он хочет приобрести, и номера товаров, которые он собирается купить. Для этого используйте команды `ReadLn` или `Read` для ввода чисел.
3. Создайте переменную `общая_стоимость` и инициализируйте ее значением 0. Эта переменная будет использоваться для подсчета общей стоимости покупки.
4. С помощью цикла `for` переберите номера товаров, указанные пользователем. Для каждого номера найдите соответствующую цену товара из массива и добавьте ее к общей стоимости. Например:
- Предположим, что пользователь хочет приобрести 3 товара с номерами 2, 4 и 6.
- Используя цикл `for`, переберите эти номера (2, 4, 6).
- Для каждого номера найдите цену товара в массиве и добавьте ее к `общая_стоимость`.
5. Выведите на экран общую стоимость покупки, используя команду `WriteLn` или `Write`.
Вот пример кода на языке Pascal:
pascal
program Общая_стоимость_покупки;
var
цены_товаров: array [1..20] of Integer; // массив цен товаров
количество_товаров, номер: Integer;
общая_стоимость: Integer;
begin
// инициализация цен товаров
// ...
// ввод количества товаров и номеров товаров
WriteLn("Введите количество товаров:");
ReadLn(количество_товаров);
общая_стоимость := 0; // инициализация общей стоимости
// ввод номеров и подсчет общей стоимости
for var i := 1 to количество_товаров do
begin
WriteLn("Введите номер товара:");
ReadLn(номер);
общая_стоимость := общая_стоимость + цены_товаров[номер];
end;
// вывод общей стоимости покупки
WriteLn("Общая стоимость покупки:", общая_стоимость);
end.
Эта программа позволит вам определить общую стоимость покупки на основе введенных пользователем количества товаров и номеров товаров.
Знаешь ответ?