Покупатели магазина пользуются 10% скидками, если покупка состоит более, чем из пяти наименований товаров или стоимость покупки превышает k рублей. Составить электронную таблицу, учитывающую скидки и содержащую сведения:
покупатель, количество купленных товаров, стоимость покупки, стоимость с учетом скидки. Выяснить сколько покупателей сделало покупки, стоимость которых превышает k рублей.
begin readln(st);//вводим строку write('Числа имеющиеся в тексте: '); for i:=1 to length(st) do if (st[i] in ['1'..'9']) then write(st[i]); //если текущий символ принадлежит ко множеству чисел -то выводим его end.