Is this code right?
Declare Integer days, counter = 1
Declare Real penny = 1, salary, total = 0
Display "Enter a number of days."
Input days
Display "Days",TAB,"Salary
While counter <= days
Set salary = penny/100
Display counter, TAB, salary
Set penny = penny*2
Set counter = counter + 1
Set total = total + salary
End While
Display" The total of your payment is$," total
End Module