PARI's commands

[science_man_88]

Been thinking of this one for a while now. I see the concept hard part is implementing what I know enough lol.

never mind lol I didn't fully get the concept, However I semi get it now.

[science_man_88]

order 6 Sierpinski triangle ?

[science_man_88]

http://rosettacode.org/wiki/Repeat_a_string
http://rosettacode.org/wiki/Keyboard..._or_N_response
http://rosettacode.org/wiki/Reverse_a_string
http://rosettacode.org/wiki/Read_entire_file

Since when are these not doable in PARI!. Just by looking I know 3 of them and if read(file) does read the full file it covers the last one lol. never mind lol:

unenlightening theres a reason.

[science_man_88]

(b)-> {
my(c=0,d=b,a=0);
for(x=1,b,a=random(b);
      for(y=1,b,
           if(a<=c||a>=d,
              a=random(b),
              break()
                  )
            );
          print("I guess "a" am I h,l,or e ?");
          e=Str(input());
                  if(e=="h",
                        d=a,
                     if(e=="l",
                         c=a,
                         if(e=="e",
                            break()
                            )
                        )
                     )
            );
}

This should work last i checked but it doesn't. It seems to have trouble with

if(e=="e",break())

I've tried form break() to break(4) no success. Never mind it's because I messed up the loop to check a and I used e both as a value and variable name I guess. I got it working.

[science_man_88]

(b)-> {
my(c=0,d=b,a=0);
for(x=1,b,
     a=random(b);
     for(y=1,b,
          if(a<c||a==c||a==d||a>d,
             a=random(b),
             break()
            )
          );
        print("I guess "a" am I h,l,or e ?");
        g=input();
           if(g==h,
               d=a,
               if(g==l,
                  c=a,
                  if(g==e,
                  break()
                  )
                )
             )
  );
}

http://rosettacode.org/wiki/Guess_th...edback_(player) The dark orange is a line that can be taken out.

[science_man_88]

http://rosettacode.org/wiki/Conditional_structures

this one is a long list lol;

addhelp alias allocatemem apply break default error extern for fordiv forell forprime forstep forsubgroup forvec getheap getrand getstack gettime global if input install kill local my
next print print1 printp printp1 printtex quit read readvec return select setrand system
trap type until whatnow while write write1 writebin writetex

[science_man_88]

http://rosettacode.org/wiki/Repeat_a_string

repeat(string,x)=for(y=1,x,print1(string))

done lol

[CRGreathouse]

Originally Posted by science_man_88

http://rosettacode.org/wiki/Repeat_a_string
http://rosettacode.org/wiki/Keyboard..._or_N_response
http://rosettacode.org/wiki/Reverse_a_string
http://rosettacode.org/wiki/Read_entire_file

Since when are these not doable in PARI!. Just by looking I know 3 of them and if read(file) does read the full file it covers the last one lol. never mind lol:

unenlightening theres a reason.

I think I was the one who put each of those in PARI/GP/Omit.

Read entire file: Not possible* in GP. It can't distinguish between a file containing 1+1 and a file containing 2, for example.
Reverse a string: Unenlightening, as you guessed. But you may very well want to do this one, even though I didn't want to.
Get Y/N: Impossible* in GP, since the task requires that only Y or N, not Enter, be pressed.
Repeat a string: Unenlightening. Again, feel free to do this anyway.

* Not possible without using extern() or system(), as far as I know.

[science_man_88]

Originally Posted by CRGreathouse

I think I was the one who put each of those in PARI/GP/Omit.

Read entire file: Not possible* in GP. It can't distinguish between a file containing 1+1 and a file containing 2, for example.
Reverse a string: Unenlightening, as you guessed. But you may very well want to do this one, even though I didn't want to.
Get Y/N: Impossible* in GP, since the task requires that only Y or N, not Enter, be pressed.
Repeat a string: Unenlightening. Again, feel free to do this anyway.

* Not possible without using extern() or system(), as far as I know.

reverse(string)=my(v=Vec(Str(string)),c="");forstep(y=#v,1,-1,c=concat(c,v[y]));c

done the reverse.

[CRGreathouse]

Originally Posted by science_man_88

repeat(string,x)=for(y=1,x,print1(string))

done lol

I think you need to return the result as a string rather than print multiple copies.

[CRGreathouse]

Originally Posted by science_man_88

reverse(string)=my(v=Vec(Str(string)),c="");forstep(y=#v,1,-1,c=concat(c,v[y]));c

done the reverse.

Great! Add it.

You may also want to register on RC so that your contributions show up under your name (or rather your chosen pseudonym) instead of under your IP address.