fork download
copy 
  1. print “Program to generate Fibonacci series\n”;
  2. print “Enter the number of terms in the series:”;
  3.  
  4. 	$n=<STDIN>;
  5. 	$count=2;
  6. 	Print “\n The Fibonacci series is:”;
  7. 	print “$a\n$b”;
  8. 	$fib=0;
  9. 	while($n>$count)
  10. 	{
  11. 		$fib=$a+$b;
  12. 		print $fib.”\n”;
  13. 		$a=$b;
  14. 		$b=$fib;
  15. 		$count++;
  16. 	}
  17.  
  18.  
  19.  
  20.  
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
5
compilation info 
===SORRY!===
Confused at line 1, near "print \u201cPro"
stdout
copy 
Standard output is empty
https://ideone.com/eZZrz
language:
Perl (perl 2018.12)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!