To help you to prepare the school examination for ICT subject, please read this points of material and next, U've prepare seriously:

The material consist of X, XI and XII grade material like a operating system, Ms. Word, Ms. Excel, Ms. Powerpoint, Ms. Access, Corel Draw, Pascal Programming, Macromedia Flash, Internet and HTML, so U can click here to download the material file

This type of loop is executed while the condition is true. It is different from the 'Repeat-Until' loop since the loop might not be executed for at least one time. The code works like this:

While do the following:

instruction 1;

instruction 2;

instruction 3;

etc...

End; {If while-do loop starts with a begin statement}

Syntax Diagram

• 

Syntax

• While condition DO Begin Statement End;
  

Semantics

• The while statement provides iteration, or looping, control.
• The expression is evaluated first.
• If the expression evaluates to true, the statement part of the while statement (the body) is executed.
• After the body is executed, the expression is evaluated again, and the process is repeated.
• If the expression evaluates to false, execution continues with the next statement after the if statement.
• Netscape® documentation indicates that the expression must be boolean; however, arithmetic and string expressions are also accepted by both Netscape® and Microsoft® browsers.
• A boolean false, an arithmetic 0, or a null string are all interpreted as false.
• A boolean true, an arithmetic expression not equal to 0, or string of at least one character are all interpreted as true.

Example Program on the While-Do loop:

Program Lesson4_Program4;
Uses Crt;

Var a : integer;

Begin
a:=1;
While a <=3 Do Begin writeln(a); a:=a+1; End; End.

Friends...
I know that this night you've problems about your internet connection, especially your router internet,,,time connection and It's make all of U be confuse cause in several time You had no time to rent your internet bisnis..

To night, I'll try to help U, there 2 solution to solve this problem :

1. MIkrotik Router
2. SQUID Windows
Click here to download tutorial of sharing internet using SQUID

I hope, this night change become to nice

This is the following files is made student XII grade on SMA 3, click the file to open it, and U need flash player to see the animation...

1.Tutorial Flash
2.Counter
3.Map of RUmania
4.Race
5.Joe Cole
6. Bungaku Mekar
7. Teropong
8. Walk Cycle