_-Alex-_
Grünschnabel
Dabei seit: 15.11.2008
Beiträge: 2
|
|
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
|
|