Написать программу вычисления стоимости покупки с учетом скидки. скидка в 3% предоставляется в том случае, если сумма покупки больше 500 руб., в 5% — если сумма больше 1000 руб. (phyton) не паскаль
var a,b:real; begin writeln('Enter price: '); readln(a); b:=10; b:=a/b; if (a>1000) then begin writeln('Discount 10%'); a:=a-b; write('Price with discount: ',a:2:2); readln; end else begin write('Price: ',a:2:2);
begin
writeln('Enter price: ');
readln(a);
b:=10;
b:=a/b;
if (a>1000) then
begin
writeln('Discount 10%');
a:=a-b;
write('Price with discount: ',a:2:2);
readln;
end
else
begin
write('Price: ',a:2:2);