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...
Hi mikrom,
Mea Culpa!
I took your advice and your untouched (untouched by human hands?) version worked!
I must have screwed up during line numbering.
Thanx for all your help.
Pervez
Hi mikrom,
Attached is the compilelog which I forgot to attach before.
Pervezhttps://files.engineering.com/getfile.aspx?folder=348400e3-87d5-4daf-8ffc-724b6913af15&file=compilelog.txt
Hi mikrom,
When you have time can you please look at the ERROR I get when running your code.
Also, I do not understand Lines 2320 - 2360.
The Distance Matrix lines 2370 - 2384 I recognise as the distance between cities 1 to 7.
But what do lines 2320 - 2360 represent?
Regards
Pervez
PS: No...
Hi Mikrom,
Just thrilled to receive your response.
Will try it out later.
If it works I will give you another star.
If it does not I will take back the first star :)
Thanx
Pervez
Hi Mikrom,
I think I did not make myself clear.
I am trying to find the shortest route from any city (example 4) back to 4, while going through ALL cities exactly once.
Travelling Salesman Problem – Qbasic
5 'Travelling Salesman Problem
10 'number of cities
20 N = 10
30 Dim...
Has anyone written a code in QBasic to solve the Travelling Salesman Problem?
I can solve it in Excel Solver but would be interested in the code.
Pervezhttps://files.engineering.com/getfile.aspx?folder=855c4bc6-288a-40e1-b531-4633fbe519ff&file=TSP_-_SOLVER_v1.xlsx
Hi mikrom,
A kindred spirit.
Studied maths at uni but never enjoyed it.
Too many exams and too much pressure.
Now I enjoy it thoroughly (along with Physics).
My main interests are in Prime Numbers and Cantor's Infinite Set theory.
I also enjoy Linear Programming and use Excel's Solver to keep...
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.