Love(I,you)

a poem written in pascal:

While (sky=blue) and love(I,you) do

  Inc(Time);

For second := lasttime to time do

  I.love := I.love*2;

While (sky=blue) and love(I,you) do

  Sun.radius := sqr(infinite);

If love(you,me) and (sky=blue) then

  Put(chance)

Else I := I;

While (sky=blue) and (time>lasttime) do

  If love(you,me) or not love(you,me) then

    Begin I.heart := 'you' end;

{                                              }

{                             Carlisson Galdino}