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

блок-схема во вложении..................

uses crt;var a,s:real;beginwrite('Введите общую цену товаров, которую вы хотите купить: ');readln(a);if a>1000 then s:=a-0.1*aelse s:=a;writeln('Стоимость покупки составляет ',s,' рублей.');end.Это программа. Суть в том, что если цена больше 1000 рублей,  то стоимость - это цена минус 1/10 от это цены, иначе цена совпадает со стоимостью.