Магазин обслужил за день 200 покупателей, каждый из которых потратил на покупки от 10 до 1100 р. Покупателям с суммой
покупки больше 1000 р. магазин подарил скидочные карты. Составьте
программу, вычисляющую дневную выручку магазина, среднюю сто-
имость покупки и количество выданных за день скидочных карт.​

artemovfoxy1987 artemovfoxy1987    2   19.10.2020 14:45    61

Ответы
aminyl aminyl  18.11.2020 14:46

Задача. Магазин обслужил за день 200 покупателей, каждый из которых потратил на покупки не более 1000 рублей. Посчитать дневную прибыль магазина и сумму среднего потребительского чека.

Сколько переменных нужно? (200)

Заполним массив случайными числами, используя диапазон от 1 до? (1000)

Какие алгоритмы будем использовать при решении задачи? (Нахождения суммы и среднего арифметического)

Сколько покупателей, у которых сумма чека больше среднего?

Чек каждого покупателя необходимо сравнить с суммой среднего чека. Для этого необходимо использовать цикл. (записать на доске: if a[i]sr then k:=k+1;)

За компьютерами составляем программу.

program qq;

const n=200;

var a: array[1..n] of integer;

k,s,i:integer;

begin

s:=0;

k:=0;

for i:=1 to n do

begin

a[i]:=random(1001)+1;

s:=s+a[i];

end;

for i:=1 to n do

if a[i]s/200

then k:=k+1;

writeln('Дневная прибыль магазина ',s);

writeln('Сумма среднего потребительского чека ',s/200);

writeln('У ',k,' покупателей сумма чека больше среднего');

end.

Внести изменения в программу: Есть ли покупатель, у которого сумма чека 555 рублей.

k:= 0;

for i:=1 to N do

if A[i] = 550 then k:= k+1;

if k 0 then write('Есть') else write('Не нашли!');

Есть необходимость просматривать весь массив? Нет, если нашли первого покупателя можно выйти из цикла? Как? break

k:= 0;

for i:=1 to N do

if A[i] = 555 then begin

k:= i;

break

end;

if k0 then write('Нашли') else write('Не нашли!');

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика