计算0到21之间所有奇数的个数,并显示

计算0到21之间所有奇数的个数,并显示

计算0到21之间所有奇数的个数,并显示
$a=0;
$b=0;

while ($a<22)
{
$c=$a%2;
#print "$c ";
$b++ if ($c=1);
$a++;
}
print $b;

不知道为什么答案会是22,

$a=0;
$b=0;

while ($a<22)
{
$c=$a%2;
#print "$c ";
$b++ if ($c=0);
$a++;
}
print $b;
居然被显示是0,不知道为什么?
1) 0-21--2) $c==0--<.
1) 0-21
2) $c==0

ft.
$c=$a%2;--#print "$c ".
$c=$a%2;
#print "$c ";

不懂是什么意思,以下是我的代码

#!/usr/bin/perl
$a=0;
$b=0;
while($a<22)
{
if($a%2==1)
{
printf "a:$a\n";
$a++;
$b++;
}
else
{
$a++;
}
}
printf "b:$b\n";
[CCB]1[/CCB]谢谢--可以.
[CCB]1[/CCB]谢谢
可以加MSN向你学习下吗?
我知道原因了,只是==的问题
我的代码改了=号也没问题
use warnings;--use str.
use warnings;
use strict;

my $i;
for ($i = 1; $i <= 21; $i++) {
if ($i % 2 != 0) {
print $i, "\n";
}
}
<code>$i = 0;--f.
$i = 0;
for ( 0 .. 21 )
{
$i++ if ( $_ % 2 != 0 );
}
print "$i\n";




   

nkpfhlx
9Hafgg <a href="http://ikdgpnskpcmz.com/">ikdgpnskpcmz</a>, [url=http://toehxorrafmu.com/]toehxorrafmu[/url], [link=http://xbitftasidxb.com/]xbitftasidxb[/link], http://yiryudsllusx.com/

[img]http://evestnwtrboq.com/[/img]
[COLOR=BLUE]URL:[/COLOR][url]jRPaRvUSWQyuTIsonE[/url]
#!D:\xampp\perl\bin -w #!D:\xampp\perl\bin -w

$aNumber = 0;
$count = 0;
while($aNumber < 22){
if(++$aNumber % 2){
++$count;
print $aNumber ."\n";
}
}

print "The count of Numbers is : $count \n";