Question and Answers

Can anybody tell me what is wrong with this code? - EliteForce I am using Delphi to do some programing. I am creating a "Console Application" I have written up a code: program Calc; {$APPTYPE CONSOLE} var boars,minutes : integer; begin { TODO -oUser -cConsole Main : Insert code here } writeln(' This program Calculates the amount of Boars killed...' ); writeln( 'Please Enter the amount of minutes played' ); readln(minutes); boars := minutes // 4; writeln('The amount of boars killed is',boars); readln; end. When ever I click F9, to run the application, Delphi selects the following line in red, to represent an error: writeln('The amount of boars killed is',boars); I am not sure what the error is, so can anybody please help me. Thanks in advance.

Best Answer: boars := minutes div 4; writeln('The amount of boars killed is ' + IntToStr(boars)); boars are integer, need to convert to string/pchar before output. also better to use div instead of /, because if minutes will be 9, so 9/4 will have float output and program will break with an error. - Randy

Report Abuse

Best Answers are selected by the person who asked the question or other Yahoo! users. Find out more at Yahoo! Answers.