Написать программу вычисления стоимости покупки с учётом скидки. скидка в 10% предоставляется, если сумма покупки больше 1000 руб.

265

439

Посмотреть ответы 2

Ответы на вопрос:

Sabaydin

Информатика

4,8(61 оценок)

9000 рубль будет.

nova9696

Информатика

4,4(67 оценок)

Var m: array [1..31] of integer; //заполненный массив sr: real; //средняя сумма sum: integer; //сумма всех элементов i: integer; a: integer; //значений выше b: integer; //значений ниже c: integer; //равных среднему begin for i : = 1 to 31 do sum : = sum + m[i]; sr : = sum / 31; for i : = 1 to 31 do if m[i] > sr then a : = a + 1 else if m[i] < sr then b : = b + 1 else c : = c + 1; writeln(a); writeln(b); writeln(c); end.