BEGIN
SET TITLE Programming;
SET Subject Why is it in my blog?
SET Char Choice;
REPEAT
{
DO
{
DISPLAY(Please enter the dotdotdot you wanna to enter: );
READ dotdotdot;
IF(dotdotdot <>=0 AND dotdotdot<=2000) THEN
dotdotdot = 0.0;
ELSE IF (dotdotdot > 2000 AND dotdotdot <= 10000) THEN
dotdotdot = (dotdotdot-2000) * 0.10;
ELSE IF (dotdotdot > 10000 AND dotdotdot <= 40000) THEN
dotdotdot = (dotdotdot-10000) * 0.20 + (8000 * 0.10);
ELSE
dotdotdot = (dotdotdot-40000) * 0.40 + (30000 * 0.20) + (8000 * 0.10);
END IF
DISPLAY(Do you wish to continue (y/n): );
READ Choice;
}
UNTIL(Choice == 'n')
DISPLAY(The amount of dotdotdot is:, "dotdotdot");
END
ToBeContinue - dotdotdotdotdotdotdotdotdotdotdotdot
