Beginners Task #2

[scrappy]

have not been here for a while. here's my solution.

Code: Select all

#include <iostream>
#include <cstdlib>
using namespace std;

int main(void)
{   
int primes[1000];   
int number,count,x,lastprime;

lastprime=2;
count=0;
cout<<"Enter the number";
cin>>number;

while(number>1){
  for(x=lastprime;x<=number;x++){
      if(number%x==0){
          primes[count]=x;
          lastprime=x;
          count++;
          number=number/lastprime;
          break;
      }
  }
}
     
for(x=0;x<count-1;x++){
    cout<<primes[x]<<"x";
}             
cout<<primes[count-1];   
    system("PAUSE");
    return 0;
}

[schloob]

heres my solution in schloobscript:

Code: Select all

stdin $num;
int $num;
pos $begin1;
set $i 2;
pos $begin2;
set $m $num;
mod $m $i;
not $m;
if $m 4;
print $i;
print " * ";
div $num $i;
goto $begin1;
set $a $i;
mult $a $a;
lt $a $num $r;
if $r 2;
add $i 1;
goto $begin2;
print $num;

[tomcant]

Nice to see my contest is still going!

[schloob]

Nice to see my contest is still going!

i decided to try some of the contests with schloobscript its 4x faster than php! yay!

[Darobat]

Does it actually create an exe or just run it from the console that "compiled" it?

[schloob]

Does it actually create an exe or just run it from the console that "compiled" it?

its interpreted

as in

ss c:/ss.txt

will run whats in ss.txt :-\

[Corsix]

I know how you could make an exe - the cheating way...
Have an exe interpreter that has the code in an RCData resource.
To make an exe copy this new interpreter exe and use Win32's UpdateResource

[Corsix]

and my solution in CorsixScript:

Code: Select all

include "io.cxs" "math.cxs" "logic.cxs"
print "Enter number: "
set $number 0
scan $number
print "Prime factors: "
section $part1
eq $number 1 $num_is_1
isprime $number $num_is_p
ifany $num_is_1 $num_is_p
jump $finish
set $int 1
section $part2
add $int 1
isprime $int $num_is_p
ifnot $num_is_p
jump $part2
set $modres $number
mod $modres $int
if $modres
jump $part2
print $int " * "
div $number $int
jump $part1
section $finish
print $number
end

[schloob]

you just cant beat schloobscript though.. its so compact! so awesome! so.. so.. BETTER!

corsixscript is so cliché, so un-good

its all about the schloob script baby!

[Corsix]

corsixscript is so cliché, so un-good

Did I say that it was good? But what makes it so cliché? The fact that you didn't make it?

[schloob]

corsixscript is so cliché, so un-good

Did I say that it was good? But what makes it so cliché? The fact that you didn't make it?

The fact that you didn't make it?

exactly!

why is it cliché?

half of it is mine for one, and your if statements are unoriginal

im only joking here, if you didnt gather that, i still think your is neat

[allan]

stop with that smilie schloob.

[Corsix]

im only joking here, if you didnt gather that, i still think your is neat

i know , i did, as do I

edit: but brings so much happiness...

[schloob]

whahaahah, that just makes me laugh too much



wizard, do you think we could like switch with .. the face sucks pretty bad -.-

[Beer Hunter]

In accordance with the current theme, here's a solution in my new language, Unsuckscript.

Code: Select all

print "Enter a number: "
x = readint()
print "Prime factors: " + [
   i = 2
   while i <= x:
      if x % i == 0: yield i; x /= i
      else: i += 1
   ].join(" x ")