Ребят, пожалуйста, помогите))
Массив содержит информацию о стоимости 20 товаров в магазине (случайные числа от 1 до 50). С клавиатуры вводится количество товаров, которые приобретает покупатель, и номера приобретаемых товаров. Составьте программу для нахождения стоимости покупки.
Ответы
Задача
В один массив записаны наименования товаров, в другую - их цена. Написать программу, вычисляющую общую стоимость покупки при условии, что пользователь может указывать приобретаемый товар и его количество.
Решение
Описание переменных:
goods - массив-константа названий товаров;
price - массив-константа цен товаров;
i - счетчик;
g - введенный пользователем номер товара;
q - введенное пользователем количество товара;
sum - сумма покупки.
Алгоритм решения задачи:
Присвоить переменной sum значение 0, после чего в цикле выполнять действия:
Запросить у пользователя номер очередного товара, который он хочет приобрести.
Если был введен 0, то выйти из цикла.
Запросить количество данного товара.
Добавить к переменной sum произведение цены товара на его количество.
После завершения цикла вывести значение sum на экран.
Программа на языке Паскаль:
const
N = 10;
goods: array[1..N] of string = ('Груши','Яблоки','Огурцы','Помидоры','Укроп','Петрушка','Курица','Сыр','Масло','Молоко');
price: array[1..N] of real = (40.50,31.20,21.80,35.00,150.00,145.00,200.00,400.00,81.40,53.35);
var
i, g: byte;
sum, q: real;
begin
for i:=1 to N do
writeln(i,') ', goods[i], ' - ',price[i]:5:2,' руб.');
writeln('Что берём? (вводите № товара; если ничего, то 0)');
sum := 0;
while True do begin
write('Товар: '); readln(g);
if g = 0 then break;
write('Количество: '); readln(q);
sum := sum + price[g] * q;
end;
writeln('Сумма к оплате: ',sum:6:2);
end.
Проверка работы программы:
1) Груши - 40.50 руб.
2) Яблоки - 31.20 руб.
3) Огурцы - 21.80 руб.
4) Помидоры - 35.00 руб.
5) Укроп - 150.00 руб.
6) Петрушка - 145.00 руб.
7) Курица - 200.00 руб.
8) Сыр - 400.00 руб.
9) Масло - 81.40 руб.
10) Молоко - 53.35 руб.
Что берём? (вводите № товара; если ничего, то 0)
Товар: 2
Количество: 0.5
Товар: 5
Количество: 0.1
Товар: 7
Количество: 1.2
Товар: 8
Количество: 0.3
Товар: 10
Количество: 1
Товар: 0
Сумма к оплате: 443.95