cy, 187 bytes

Result

WA

Code [DL]

0 =x
0 =cnt
0 =num
0 =cnt2
1 =p

{.p 1000 *=  .cnt2 ++} =f
{$cnt2 $num <} =g
{ :>c :i =num 0 =cnt2 1 =p $f $g while  .x  $p $num * +=  .cnt ++ }
{$cnt 100 <}
while
$x 
print

stdin

7821322985777619061336456873004642352025846623522512763909400976888036661995876090782879867677577970

stdout

stderr

RubyError
	@ `:>c' (0:0)
RubyError
	@ `while' (10:0)
/home/esolang/interpreters/cy.rb:125:in `getch': Inappropriate ioctl for device (Errno::ENOTTY)
	from /home/esolang/interpreters/cy.rb:125:in `block in <class:Cy>'
	from /home/esolang/interpreters/cy.rb:73:in `instance_exec'
	from /home/esolang/interpreters/cy.rb:73:in `block (2 levels) in initialize'
	from /home/esolang/interpreters/cy.rb:549:in `block in runMeth'
	from /home/esolang/interpreters/cy.rb:665:in `block in exec'
	from /home/esolang/interpreters/cy.rb:660:in `each'
	from /home/esolang/interpreters/cy.rb:660:in `exec'
	from /home/esolang/interpreters/cy.rb:583:in `block in block'
	from /home/esolang/interpreters/cy.rb:450:in `instance_exec'
	from /home/esolang/interpreters/cy.rb:450:in `call'
	from /home/esolang/interpreters/cy.rb:330:in `block in <class:Cy>'
	from /home/esolang/interpreters/cy.rb:80:in `instance_exec'
	from /home/esolang/interpreters/cy.rb:80:in `block (2 levels) in initialize'
	from /home/esolang/interpreters/cy.rb:549:in `block in runMeth'
	from /home/esolang/interpreters/cy.rb:665:in `block in exec'
	from /home/esolang/interpreters/cy.rb:660:in `each'
	from /home/esolang/interpreters/cy.rb:660:in `exec'
	from /home/esolang/interpreters/cy.rb:777:in `block (3 levels) in <main>'
	from /home/esolang/interpreters/cy.rb:844:in `<main>'

strace