FlamingClaw

Hi killhha. I know that your thread is solved. I wrote a little program for the ascii table's key codes: [code=pascal] Program solution; Uses Crt; Var i:Byte; Begin WriteLn('The numbers are:'); For i:=0 To 255 Do WriteLn('#',i:3,'=',Chr(i)); WriteLn('Press enter to continue...'); ReadLn; End. [/code] But if you want to see …

Our text file contains 10 words,and located in C:\ drive,we will read this data into an array and write out the results to the screen Created by FlamingClaw 2009.04.26.

It is a really simple calculator :) [code=pascal] program simple_calculator; uses crt; var a,b,result:real; m:set of char; choice:char; begin clrscr; m:=[]; include(m,'+'); include(m,'-'); include(m,'*'); include(m,'/'); repeat write('num1: '); readln(a); write('num2: '); readln(b); write('operator: + - * / : '); readln(choice); case choice of '+':result:=a+b; '-':result:=a-b; '*':result:=a*b; '/':result:=a/b; end; until choice …

By default, Windows XP opens all picture files (gif,jpg,...) with the included Windows Picture and Fax Viewer no matter what other picture viewers you have installed. To disable the Windows Picture and Fax Viewer, unregister shimgvw.dll. This can be done from command prompt: regsvr32 /u shimgvw.dll (Additional note: unregistering shimgvw.dll …

your code is working well,where is the problem????? you can write here too:[b] if posNeg=0 then begin balance:=balance*-1; writeln('Can you hear that sound? Its your cheque bouncing'); sound(200,1000); end; If NegPos = 1 Then writeln ('Positive balance'); [/b] In your example if you put a semicolon[b];[/b] after your If statement's …

array lenght = size of the element type * index You can find the size of the array in the memory as I show it above. Delphi (object pascal) has dinamic array, that we can set the length by the SetLength(array_name, element_number) procedure, so the elements starting from 0 to …

[URL="http://www.daniweb.com/code/forum124.html"]http://www.daniweb.com/code/forum124.html[/URL]

try the softwer center in your main menu, go to the programming section, and write: pascal, and you'll get a list about pascal packages, like Lazarus, freepascal, etc, just click and install. Fully woriking, I tryed it.

This example is demonstrates a solution for direct arranging By FlamingClaw

The Randomize procedure task is to set the RandSeed constant to generate always random numbers...so it is need realy. :-D

get a xp installer Required : Windows XP operating system, Windows XP cd Place the xp cd in your cd/dvd drive Press win key+r type in 'sfc /scannow' (without the ') Now it should all load, and fix all your corrupted file on windows XP

Or if the above not helps,then you can try the direct download [URL="http://dllcentral.com/uxcore.dll/12.0.1111.1005/"]http://dllcentral.com/uxcore.dll/12.0.1111.1005/[/URL]

Required : Windows XP operating system, Windows XP cd Place the xp cd in your cd/dvd drive Press win key+r type in 'sfc /scannow' (without the ') Now it should all load, and fix all your corrupted file on windows XP

First download the developer kit from the [URL="http://java.sun.com/javase/downloads/index.jsp"]http://java.sun.com/javase/downloads/index.jsp[/URL].Select jdk to download. After downloading it,install the file. If it is success then open command prompt and type [icode]java -version[/icode] and press enter,if the installation is good then the command prompt is writes the actual java version in your computer... like : …

[code] ... ... ReadLn(BallsNo); ptr:= 1; While ptr <= 1 Do Begin {you wrote < sign instead of <=, got it?} ... ... [/code]

If you wanna pay for these just do it [URL="http://worldpubliclibrary.org/"]http://worldpubliclibrary.org/[/URL]

Another example? [code=pascal] Program RandomNumbers; Uses Crt; Var A,B,C,i:Integer;{-32767..32768} Begin {main} ClrScr; Randomize; {shuffling} For i:=1 To 3 Do {this just that see the results for three times} Begin A:=Random(20); {tis will generate one number from 0 to 20} WriteLn(A); {write the results..} B:=Random(20); WriteLn(B); C:=Random(20); WriteLn(C); WriteLn; End; ReadKey; …

This is just a simple password program...

let's see... :D [code=pascal] (*your source code interpretered...by me*) program text_files; var f,(*in.txt*) g:text;(*out.txt*) x:string; (*one string...*) begin (*in.txt's path assigned to f var*) assign(f, 'd:\pascal\dosare\in.txt'); (*out.txt's path assigned to g var*) assign(g,'d:\pascal\dosare\out.txt'); (*x's value is be that string..?,why?,if you don't use it?*) x:='d:\pascal\dosare\in.txt'; reset(f); (*open for reading f*) rewrite(g); …

I uploaded a book about object pascal [URL="http://www.daniweb.com/forums/thread187150.html"]http://www.daniweb.com/forums/thread187150.html[/URL]

press win button+r to get the run window type cmd press enter If you want to check the disk in drive D and have Windows fix errors,when console is running type: chkdsk d: /f If it encounters errors, chkdsk pauses and displays messages. Chkdsk finishes by displaying a report that …

Can you send us abit more information about your problem?

'Halt ' command = exit the main program :)

The arguments are passed by value and by reference

any effort?

Any effort? Try to send some of your code,then maybe I can help you.Thank you.

[QUOTE=Turtle85;1224089]I really need help in trying to understand what the "dat:table" is in this procedure, and how to translate it to Java. procedure Taylor(var dat: table ; cd: integer; h: real); begin for i:=2 to cd + 1 do begin dat[i,1] := dat[i,1] + (i-1)*h; x := dat[i-1,1]; y := …

Is this just a procedure? If yes ,then write me how to get value the procedure's arguments,ok?

[QUOTE=Simon180;1204366]how would i go about spliting a string that is stored in a StringList ? information in string looks like this: Name RanK now i need to split them so i can use a funcation like this data[0] for Name and data[1] for rank can sumone help me please? thanks[/QUOTE] …

[CODE=java] class stringdemo { public static void main(String[] args) { String s1,s2,s3,output; s1 = "hello"; s2 = "hello guys"; s3 = "happy birthday"; output = "s1="+s1+"\ns2="+s2+"\ns3="+s3; System.out.print(output); } /* *By FlamingClaw.2010.04.05.Hungary */ } [/CODE]