: : Well the output I want is in real format. I've tried using double but it doesn't work either. The calculations I have done are correct and work fine on numbers under 1000.
: :
: nope its ok right do you know decamal places you need to do it in this case! ok give me the output line and I will fix it!
:
see real is decamal numbers! so here is an example
program example;
uses crt;
begin
write(' Enter the price of the product: ');
readln(price);
discount := price / 10;
writeln('The discount is as follows',discount1:2:); {this is where the decamal is read! :1:2: says is the 2 decamle places after the 1st you can chage that to any number you wish!}
readln; untill enter is presed;
end.