Нарисовать блок-схему к алгоритму. Цикл с постусловиемЗадание. Составить программу для планирования покупки в магазине товаров на сумму, не превышающую заданную величину.РешениеОбозначим через x и k цену и количество товара, через p - заданную предельную сумму, через s - стоимость покупки.Начальное значение общей стоимости покупки s равна нулю. Значение предельной суммы вводится с клавиатуры.Необходимо повторять запрос цены и количества выбранного товара, определять его стоимость, добавлять ее в общую стоимость и выводить результат на экран до тех пор, пока стоимость не превысит предельную сумму p.Рrogram Exemple;Var x, k, p, s: integer;BeginWrite ( 'Предельная сума--');Readln (P);S: = 0;RepeatWrite ( 'Введите цену товара и его коли-кость: ');Readln (x, k)S = s + k * x;Writeln ( 'стоимость покупки равна', s)Until s> p;Writeln ( 'стоимость покупки превысила предельнуюсумму! ');End.