Hi Mikrom,
Thanx for all your help on this issue.
I will now give programming a rest (and give you some peace also).
Till I come across a suitable interesting problem to solve.
I will try to solve it myself first, then try again, then probably fail and then finally in desperation I will...
Hi Mikrom,
Yes, I set COUNT as As _Unsigned _Integer64 and it worked.
I have now identified the 200,000,000th Prime. The program ran from21:30 till 08.20 approx 11 hours!
However, the attached screen shows a strange negative number for Elapsed Time!
Any idea what this is?
pa99
Hi Mikrom,
I tested your latest version with the counter but after about 17 minutes the program stops at 1.676E+07 and does not go up to the 20,000,000th Prime!
I am sure this could be a limitation of either 1) my old DELL 15 laptop or 2) QBASIC.
Would you be able to shed some light please?
pa99
Hi Mikrom,
Thanx for your help.
Your code has reduced processing time by over 50%. Very happy. (See below).
I can now test large Primes.
One more question:
For very large Primes where K = 22,000,000, the program either a) stalls or b) takes an inordinate amount of time, after which I just...
Hi Mikrom,
This QBASIC program searches for the kth Prime Number and prints the Prime Number and k value.
I have tested it on a site for checking Primes.
Is there any way I can speed up the processing time?
Your help appreciated.
pa99
Gents,
I checked again and rectified the error.
Although the conversion from Celsius to Fahrenheit and back is a simple calculation, one of my objectives is to keep learning through coding and invoking new functionality e g CASE SELECT, something which I had never heard of...
Hi Mikrom,
After a long time I am trying to code with Subroutines.
I get Error: Label Not Defined on Line 145 but not on 95.
Why should this be?
And what is the error trying to tell me?
And how do I get rid of it?
Thanx for your help...
Hi Mikrom,
I am writing a simple Temperature conversion QBASIC Program for my grandson.
Psuedo code looks like this
INPUT T$
IF T$ C F K
Depending on whether input is C F or K
I will use a GOTO to carry out different calculations
I am trying to avoid multiple IF statements and would like to...
Writing a simple program which I will tidy up later but I need to resolve this Error.
Please help.
pa99https://files.engineering.com/getfile.aspx?folder=131b8266-c764-4ae2-bb74-d7d57165949b&file=QBASIC_Error.JPG
Hi Mikrom,
Thanx for your help.
The Code works, but ChatGPT is not impressed!
Can this code be improved V15.3
100 REM 6N +- 1 Test V15.3
110 DIM P1, P2, N1, N2 AS _Unsigned _Integer64
120 INPUT “Number “; N
130 IF N <= 0 THEN GOTO 999
140 N1 = N
150 N2 = N
200 P1 = (6 *...
Hi Mikrom,
Thanx for the tip.
Code works for small numbers; I will now test for 10+ digit numbers.
One more question:
Is there a way of combining the 4 DIM statements into 1 line?
eg DIM P1, P2, N1, N2 AS LONG
Thanx
pya
Hi Mikrom,
Further to my post if I use PRINT instead of PRINT USING , the code works fine.
But, PRINT USING should allow me to display the output number in detail instead of in scientific exp notation.
Try the code with N = 3, 4, 5, 6, 59 and 288 to see how it works.
Pervez
Hi Mikrom,
Your help appreciated please.
I keep getting a TYPE MISMATCH Error on Line 14 ( Line No 240)
Can you help please.
100 REM 6N +- 1 Test V15.3
110 DIM P1 AS LONG
115 DIM P2 AS LONG
120 DIM N1 AS LONG
125 DIM N2 AS LONG
130 INPUT “Number “; N
140 IF N <= 0 THEN GOTO...
Hi mikrom,
One last question:
How do I insert spaces between the brackets in the output?
( 2, .....7, 2 ) and ( 23, .... 19, 24 )
At my age I can get confused if the output is like
(2, ....7, 2) and (23, .....19,24)
I modified a few lines but got no change.
Regards...
Hi mikrom,
I ran your code for 10 cities and it worked fine.
But, I have a couple of questions and would be grateful if you could answer at your convenience.
1. I do not understand the first set of Distance Matrix - DATA 0,34,36 and the following 2 lines.
2. My 2nd question is where is the...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.