program discount;
var
x:integer

begin
writeln('what is the total cots of your 3 items');
readln(x)
if (x<100) then
writeln('you get no discount');
if(x>100) and (x<150) then
writeln ('you get a 10% discount');
if (x>150) and (x<200) then
writeln('you get a 20% discount');
if (x>200) and (x<250) then
writeln('you get a 25% discount')
if (x>250) then
writeln ('you get a 30% discount');
readln;

end.

So many issues here:

  1. No question, discussion or why you posted this.
  2. Poorly formatted. Why should anyone read this code?
  3. Try again but spend a few more minutes to tell everyone what the issue is and format that code for readibility.
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.