glindhot

<input type="radio" name="Wed" value="" checked>None <br /> <input type="radio" name="Wed" value="Class 1">Computers <br /> <input type="radio" name="Wed" value="Class 2" >Physics (1st 5 weeks) <br /> <input type="radio" name="Wed" value="Class 3">Astronomy (2nd 5 weeks) <br /> <input type="radio" name="Wed" value="Class 4">Mathematics <br /> <input type="radio" name="Wed" value="Class 5">Literature <br /> This …

A program I wrote calculates ratings for the winner and loser of a sporting event. As new results are added the ratings are updated, ie from Pre to Post. It works fine. I also need a version in Excel but I have a problem. Example of the problem: John’s Post …

I am rather fond of frames – a static navigation bar suits me fine. I wanted to put a frame on my homepage but not if it meant problems for browsers, etc. My solution was a combination – a standard frameless page but with an optional link to a frame. …

Your program has errors - nor will it calculate compound interest. Give variables clear descriptive names. That will help you keep track when programming. Always put comments within the program. When you come to update your program, particularly if it is a big one, or simply try to recall what …

[code] program echostar; uses Crt; const EnterKey = ord(13); var Entry :char; SecretMessage :string; begin ClrScr; SecretMessage := ''; Entry := ' '; writeln('Enter your secret word or message:'); repeat begin Entry := (Readkey); write('*'); if ord(Entry) <> EnterKey then SecretMessage := SecretMessage + Entry; end; until ord(Entry) = EnterKey; …

[code]begin Inc(GamesThisPlayer[Winner]); if GamesThisPlayer[Winner] = SampleGamesBatch then ProvisionalRating[Winner] := Rating[Winner]; Inc(GamesThisPlayer[Loser]); if GamesThisPlayer[Loser] = SampleGamesBatch then ProvisionalRating[Loser] := Rating[Loser] end;[/code] This extract of code is from a player rating program. A player either wins or loses. When a player has played a sample batch of games (20 in this case) …

Your program displays your code simply because it comes to the end. If you press F5 you will see that your seven segment display is there. Naturally, you want to see that display on the normal screen. In that case you will need to stop the program from coming to …

Question 1 - Press Alt Enter will turn it into a full screen display. [[I]line#[/I]] SCREEN 0 'text screen (default screen when you enter BASIC) [[I]line#[/I]] SCREEN 1 'medium-resolution screen [[I]line#[/I]] SCREEN 2 'high-resolution screen either [[I]line#[/I]] WIDTH 80 '80 columns of characters on the screen or [[I]line#[/I]] WIDTH 40 …

Perhaps there is an error in line 25. Try changing to [code]Adj[j,i] := TRUE;[/code]

Try the function [code]RoundRect(DC: HDC; X1, Y1, X2, Y2, X3, Y3: Integer) : Bool;[/code] I've never got around to using it, but it says in the book "Draws a rectangle with rounded corners using the selected pen and filled using the selected brush."

[code]program pics; var N : integer; OutString : string; begin for N := 1 to 6 do begin Str(2*N, OutString); writeln('image'+ OutString) end end.[/code] That is the code I've got and here is its output: image2 image4 image6 image8 image10 image12 but here is the output format that I want: …