Odd Semesters of 2011-2012

This is the schedule that you haven't to buy. just get it free by click this link below.

Take it easy
Take it free

Quadrant and GPA program in Delphi

please enjoy this file.......
http://www.4shared.com/file/3gy7Hfbq/tugas.html
I hope, it will help you full.......

The happening

When the world has not finished grieving for more than 10 thousand people who died in the earthquake japan and thousands of people threatened Fukushima Nuclear radiation hazards. Now we've been surprised again with the outbreak of war in Libya. Who Kadafi and whether he had done until Libya into the battlefield. What has been done to the french Kadafi triggering Western U.S. allies intervened. Is it true the war is related to oil is like the war in iraq. Will the U.S. return to military intervention as it did in Iraq. 

While thousands of U.S. citizens on the west coast of Fukushima radiation danger that has not stopped threatened by earthquakes. Will this war started the third world war era, how many more disasters and wars that took the victim to awaken people.  

If this is indeed like that performed the natural balancing theory for the human population that exceeds the natural ability. Because the theory that the earth is an organism mentioned that when there is an over-load elimination will harm the system runs automatically. You never think that the human population on earth has reached the threshold and coupled with the natural damage that causes the earth's capacity decreases. Earth was no longer able to provide life support to residents, the defense system EARTH conduct large-scale elimination. With so many disasters in the last decade human should be aware and look for solutions to help the Earth as a place to live they can last longer. 

Hope that 2012 is not the last year for the human lives in the face of Earth.

Price List Part 2 (final reallese)

This program is new version of Price List program in pascal code. In the past program the price list just show name and price of the Item. With color spesification you can input same name and find it corectly be entering the name and the color of the item.
This is the syntax.

uses wincrt;

type data1=array [1..20] of string;

type data2=array [1..20] of real;

var

position,n,i,x:byte;

name,color:data1;

price:data2;

found:boolean;

find1,find2:string;

again:char;

find3,average,min,max,total:real;

begin

  repeat;

  begin

    inc(n);

    writeln('Input the items name ',n:2,' for stop type xxx==>');

    readln(name[n]);

    writeln('Input the items color                      ==>');

    readln(color[n]);

    writeln('Input the items price                      ==>');

    readln(price[n]);

    total:=total+price[n];

  end

  until(name[n]='xxx');

    dec(n);

    clrscr;

    writeln('PRICE LIST BLANTIK ONLINE');

    writeln('No        Name        Color     Price');

    writeln('--------------------------------------');

    for i:=1 to n do

      writeln(i:3,'|',name[i]:13,'|',color[i]:10,' $',price[i]:10:2);

      writeln('--------------------------------------');

  {Min, max, average}

  average:=total/n;

  min:=price[1];

  max:=price[1];

  find1:=name[1];

  writeln('The average of the items price is ==> $ ',average:10:2);

  for i:=2 to n do

  begin

    if min>price[i] then begin min:=price[i];find1:=name[i];end;

  end;

  writeln('The cheapest item is ',find1,' with price ==> $ ',min:10:2);

  for i:=2 to n do

  begin

    if max<price[i] then begin max:=price[i];find1:=name[i];end;

  end;

  writeln('The most expensive item is ',find1,' with price ==> $ ',max:10:2);

  {searching}

  again:='y';

  while again='y'do

  begin

    writeln;

    write('Which items price are you lokking for? ');readln(find1);

    write('Which color do You want? ');readln(find2);

    found:=false;

    for i:=1 to n do

    begin

      if name[i]=find1 then

      begin

        if color[i]=find2 then
        begin
          found:=true;position:=i;find3:=price[i];
        end; 

      end;

    end;

    writeln;

    if found then writeln('The price of the ',find2,' ',find1,' is $ ',find3:10:2,' as data number ',position,'.')

    else writeln('sorry there is not ',find2,' ',find1,' in the array.');

    writeln;

    write('Do you want to do it again?<y,n> ');readln(again);

  end;  

end.

Wi-Fi vs WiMAX

Comparisons and confusion between WiMAX and Wi-Fi are frequent because both are related to wireless connectivity and Internet access.

• WiMAX is a long range system, covering many kilometres, that uses licensed or unlicensed spectrum to deliver connection to a network, in most cases the Internet.
• Wi-Fi uses unlicensed spectrum to provide access to a local network.
• Wi-Fi is more popular in end user devices.
• Wi-Fi runs on the Media Access Control's CSMA/CA protocol, which is connectionless and contention based, whereas WiMAX runs a connection-oriented MAC.
• WiMAX and Wi-Fi have quite different quality of service (QoS) mechanisms:
  • WiMAX uses a QoS mechanism based on connections between the base station and the user device. Each connection is based on specific scheduling algorithms.
  • Wi-Fi uses contention access - all subscriber stations that wish to pass data through a wireless access point (AP) are competing for the AP's attention on a random interrupt basis. This can cause subscriber stations distant from the AP to be repeatedly interrupted by closer stations, greatly reducing their throughput.
• Both 802.11 (which includes Wi-Fi) and 802.16 (which includes WiMAX) define Peer-to-Peer (P2P) and ad hoc networks, where an end user communicates to users or servers on another Local Area Network (LAN) using its access point or base station. However, 802.11 supports also direct ad hoc or peer to peer networking between end user devices without an access point while 802.16 end user devices must be in range of the base station.

Although Wi-Fi and WiMAX are designed for different situations, they are complementary. WiMAX network operators typically provide a WiMAX Subscriber Unit which connects to the metropolitan WiMAX network and provides Wi-Fi within the home or business for local devices (e.g., Laptops, Wi-Fi Handsets, smartphones) for connectivity. This enables the user to place the WiMAX Subscriber Unit in the best reception area (such as a window), and still be able to use the WiMAX network from any place within their residence.

copyright @ Wikipedia

pricelist program in pascal syntax (array, while do, for to do, if then else)

Pricelist is table may contains data of items name and price. From this pricelist you may get data about average of the price, the cheapest and the most expensive items price. The user can search the specific item price with only type the item name.
This is the syntax:

uses wincrt;
type data1=array [1..20] of string;
type data2=array [1..20] of real;
var
position,n,i:byte;
name:data1;
price:data2;
found:boolean;
find1:string;
again:char;
find2,average,min,max,total:real;
begin
  repeat;
  begin
    inc(n);
    writeln('Input the items name',n,'for stop type xxx==>');
    readln(name[n]);
    writeln('Input the items price ==>');
    readln(price[n]);
    total:=total+price[n];
  end
  until(name[n]='xxx');
    dec(n);
    clrscr;
    writeln('PRICE LIST BLANTIK ONLINE');
    writeln('No        Name        Price');
    writeln('--------------------------------');
    for i:=1 to n do
      writeln(i:3,'|',name[i]:13,'| $',price[i]:10:2);
      writeln('--------------------------------');
{Min, max, average}
average:=total/n;
min:=price[1];
max:=price[1];
find1:=name[1];
writeln('The average of the items price is               ==> $ ',average:10:2);
for i:=2 to n do
begin
if min>price[i] then min:=price[i];find1:=name[i];
end;
writeln('The cheapest item is ',find1,' with price       ==> $ ',min:10:2);
for i:=2 to n do
begin
if max<price[i] then max:=price[i];find1:=name[i];
end;
writeln('The most expensive item is ',find1,' with price ==> $ ',max:10:2);
{searching}
again:='y';
while again='y'do
begin
  writeln;
  write('Which items price are you lokking for?');readln(find1);
  found:=false;
  for i:=1 to n do
  begin
   if name[i]=find1 then found:=true;position:=i;find2:=price[i];
  end;
   writeln;
   if found then writeln('The price of ',find1,' is $ ',find2:10:2,' as data number ',position)
   else writeln('sorry there is not ',find1,' in the array');
   writeln;
   write('Do you want to do it again?<y,n>');readln(again);
end;
end.

Pascal programs for primes

This is pascal script to find primes from (a) to (b).

uses wincrt;
var
a,b,x,y : integer;
hasil1 : longint;
again,primes: boolean;
begin
again:=true;
repeat

  begin
    write('Count primes from');read(a);write('to');readln(b);
    for x:=a to b do
     begin
      primes :=true;
      for y:=2 to x-1 do
       begin
       if (x mod y)=0 then
        begin
         primes:=false;
        end;
       end;
      if primes then write (x:5);
     end;
   end;

end;
readln;
until not again;
end.

Task 1

Salary	X (midpoint)	workers (f)	f*x
$250.00-$259.99	254.995	8	2039.96
$260.00-$269.99	264.995	10	2649.95
$270.00-$279.99	274.995	16	4399.92
$280.00-$289.99	284.995	14	3989.93
$290.00-$299.99	294.995	10	2949.95
$300.00-$309.99	304.995	5	1524.98
TOTAL		63	17554.69

Mean

It's mean that the average of the workers salary is $ 278.64.

Median

The position of median is in data number 32, it's mean the median in class of $270.00-$279.99 with frequency class is 16 and the bottom margin is $269.995. The total frequency class below is 18. The interval is $10.00.

 

So that is mean the middle data is $278.43.

Modus

Class with the highest frequency is $270.00-$279.99, with the frequency is 16.

So the highest appearance frequency data is $277.495.

UNIT 16

This activity practices Grammar Focus : Describing changes.

I got married.                   ==> I'm not single anymore.

I wear contacts now.       ==> I don't wear glasses anymore.

I've changed jobs.             ==> I'm a nurse now.

I've cut my hair.               ==> My hair is shorter now.

I move to a new place.     ==> I live alone now.

This activity practices Grammar Focus : Verb + invinitive.

Choose the correct words and phrases to complete the paragraph. There is one extra answer.

After I finish college, I'm going to travel for one month. I hope to visit Europe. Then I plan to get a job. I'd love to work in a bank.

The extra answer is like.

This activity practices Grammar Focus : Verb + infinitive.'

• I plan to call some agencies next week.
• I'd like to for a travel agency.
• Well, I haven't found a job yet, but I hope to get one soon.
• I'd love to travel, too – after I work and make some money!
• What am I going to do after graduation?

The correct order is :

• What am I going to do after graduation?
• I'd love to travel, too – after I work and make some money!
• Well, I haven't found a job yet, but I hope to get one soon.
• I'd like to for a travel agency.
• I plan to call some agencies next week.

UNIT 15

The activity practices Grammar Focus : Future with present continuous and be going to.

QUESTION                                                 ==> ANSWER

Ken, are you doing anything this weekend?          ==> No, I'm not.

Is Jack going to see a movie tonight?                    ==> No, he isn't.

Are you and your sister going to go to the party? ==> Yes, we are.

Is Linda going to go to the game?                         ==> Yes, she is.

Are your classmates going to study tonight?        ==> No, they aren't.

This activity practices Grammar Focus : Messages with tell and ask.

Complete the sentences with tell an ask.

1. Could you ask Anita to call me tonight?
2. Please tell Jeremy that we will meet at the restaurant.
3. Would you tell Jean-Luc that there will be test tomorrow?
4. Could you ask Maria to bring her camera to the party?
5. Please ask Takashi to buy some snacks.
6. Could you tell Eliza that I'll give her a ride tomorrow?

This activity practices useful telephone expressions.

Unscramble the sentences.

1. Julie/may/speak/to/I
   May I speak to Julie?
2. here/sorry,/isn't/Andy/but
   Sorry, but Andy isn't here.
3. a/can/message/I/leave
   Can I leave a message?
4. the/give/Sylvia/I'll/message
   I'll give Sylvia the message.
5. take/I/can/message/a
   I can take a message.

UNIT 14

This activity practices Grammar Focus : Comparisons with adjectives.

Choose the correct words and phrases to complete the conversation. There is extra answer.

A: What is the tallest mountain in the world?

B: I'm not sure. I think it's K2.

A: Actually, Mt. Everest is taller than K2.

The extra answer is the most.

This activity practices Grammar Focus : Questions with how.

Complete the sentences.

1. How long is the Columbia River?
2. How far is Korea from China?
3. How hot is the Sahara Desert? Does it get to 40⁰ Celcius?
4. How deep is the Caspian Sea.
5. How high is Mt. Kilimanjaro? Is it more than 5,895 meters?

UNIT 13

This activity practices Grammar Focus : Modal verbs for requests.

Question                                        ==> Answer

What would you like to drink?                ==> I'd like tea.

What flavor would you like?                   ==> I'd like chocolate.

What kind of dressing would you like?   ==> I'd like vinaigrette.

What kind of potatoes would you like?   ==> I'll have French fries, please.

Would you like chicken or fish?              ==> I'll have the chicken.

This activity practices Grammar Focus : So, too, neither, either.

Complete the conversations with so, too, neither, or either.

1. A: I love Indian food.
   B: So do I.
2. A: I'm not in the mood for fast food.
   B: Neither am I.
3. A: I can't stand bland food.
   B: I can't too.
4. A: I'm crazy about rich desserts.
   B: I am, either.
5. A: I think pizza is delicious.
   B: So do I.
6. A: I don't eat enough healthy food.
   B: I don't too.

UNIT 11

This activity practices Grammar Focus : Adverbs before adjectives.

Unscramble the sentences.

1. extremely/it's/restaurant/expensive/an
   It's an extremely expensive restaurant.
2. a/Seattle/city/large/is/fairly
   Seattle is a fairly large city.
3. me/too/city/the/crowded for/is
   The city is crowded for me too.
4. is/my/small/hometown/somewhat
   My hometown is somewhat small.
5. noisy/very/it's/neighborhood/a
   It's a very noisy neighborhood.
6. was/boring/trip/pretty/our
   Our trip was pretty boring.

This activity practices Grammar Focus : Adverbs before adjectives; conjunctions.

Choose the correct word to complete the paragraph. There is one extra word.

My hometown is fairly small. It's nice though. It's not too expensive, and the people are friendly.

The extra word is but.

This activity practices Grammar Focus : Modal verbs can and should.

Put the sentences in their correct order!

B: You shouldn't miss the museums.

A: I love love French coffee. That sounds like a good idea!

A: I'm going to take a trip to Paris . What do you think I should see?

B: After that, you should go to the one of the cafe's nearby.

A: OK. And I want ti visit Notre Dame Cathedral.

The correct order is:

A: I'm going to take a trip to Paris. What do you think I should see?

B: You shouldn't miss the museums.

A: OK. And I want ti visit Notre Dame Cathedral.

B: After that, you should go to the one of the cafe's nearby.

A: I love love French coffee. That sounds like a good idea!

UNIT 10

These activities practices word power : activities.

Complete the sentences.

1. Have you ever ridden a horse?
2. I've never lost my cell phone.
3. Have you ever climbed a mountain.
4. I've ridden a bicycle to work for three years.
5. I've never drunk tea with milk.

The activity practices Grammar Focus : For and Since

complete the sentences with for or since.

1. I've had the glasses for three months.
2. We haven't seen you for a long time.
3. Cindy hasn't come to class since Tuesday.
4. Our class has use this book since September.
5. Laura traveled in Mexico for ten days.
6. My aunt has had short hair since 2003.

This activity practices Grammar Focus : Present perfect vs Simple past.

Put the sentences in their correct order!

• I loved food and the friendly people.
• I want to travel there next year.
• I haven't been to Portugal yet.
• Last summer, I went to Spain.
• I've visited many interesting countries in Europe.

The correct order is:

• I've visited many interesting countries in Europe.
• Last summer, I went to Spain.
• I loved food and the friendly people.
• I haven't been to Portugal yet.
• I want to travel there next year.

This activity practices Grammar Focus : Present perfect; already, yet.

Choose the correct words to complete the conversation. There is one extra word.

A: Have you already invited Kristen to the party?

B: No, I haven't called her yet. But I e-mailed her two hours ago.

The extra word is never.

This activity practices Grammar Focus : Present perfect; already, yet.

Unscramble the sentences.

1. aerobics class/been to/have/you/today
   Have you been to aerobics class today?
2. have/been late/you/for class/ever
   Have you ever been late for class?
3. visited/have/ever/you/New/York
   Have you ever visited New York?
4. you/yet/have/cleaned/your room
   Have you cleaned your room yet?
5. washed/has already/dishes/the/Sue
   Sue has already washed the dishes.
6. haven't seen/yet/Kate and Joe/the movie
   Kate and Joe haven't seen the movie yet.
7. eaten/Min Yun/has already/dinner
   Min Yun has already eaten dinner.

UNIT 9

These activities practices Grammar Focus : Describing people and modifiers with participles and prepositions.

1. ones/which/Millers/the/are
   Which ones are the millers?
2. the living room/ones/they're/the/in
   They're the ones in the living room.
3. Matt/is/one/which
   Which one is Matt?
4. the blue shirt/he's/the tall/in/man
   He's the tall man in the blue shirt.
5. wearing/the/a brown/Bill is/suit/man
   Bill is the man wearing a brown suit.

These activities practices Grammar Focus : Describing people and modifiers with participles and prepositions.

Choose the correct word to complete the conversation. There is one extra word.

A: Why don't you go and talk to Tim?

B: Tim? Which ones is he?

A: He's wearing jeans and he has a mustache.

B: I see him – he's the one talking to Kate.

The extra word is who.

These activities practices Grammar Focus : Describing people and modifiers with participles and prepositions.

Put the sentences in their correct order !

B: No, He's the one wearing a green T-shirt.

A: Hi, Jan. I'm looking for Nam Il Kim. Do you know him?

B: Yes, I do. He's the young man in the blue jeans.

A: Oh, yes, I see him. He's standing next to window.

A: Jeans? Is he the one with a button-down shirt and tennis shoes?

The correct order is:

A: Hi, Jan. I'm looking for Nam Il Kim. Do you know him?

B: Yes, I do. He's the young man in the blue jeans.

A: Jeans? Is he the one with a button-down shirt and tennis shoes?

B: No, He's the one wearing a green T-shirt.

A: Oh, yes, I see him. He's standing next to window.

Newbie

Hello......
This is my first time write here......
The next will be awesome.....
Wait here..... cotto mate.....
I'll be back.....