Nur Zeilensprung als Ausgabe, wieso?

Neue Frage »

Auf diesen Beitrag antworten »
_-Alex-_ Nur Zeilensprung als Ausgabe, wieso?

Hi,

ich hab hier ein Programm, das mir nur einen Zeilensprung ausgibt. Könnt ihr mir sagen, wieso?

#!/usr/bin/perl -w
$t=0;
for($i=1;;++$i)
{
do
{
$k=1;
$v=sprintf("%.5f",$i/$k);
$t=$t+$v;
++$k;
}
while($k<=$i);
if($v==$i+1)
{
print $i, "\n";
}
}


MfG smile
 
 
Neue Frage »
Antworten »


Verwandte Themen

Die Beliebtesten »
Die Größten »
Die Neuesten »