18.10.2007, 11:24
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме:
21768337
Репутация:
3486
|
|
Сообщение от demonoid
2 [sL1p]
ИМХО красивей
Код:
#!/usr/bin/perl -w
use strict;
use warnings;
my( $var,$VR,$VRR ) = ( 55.55,undef,undef );
($VR,$VRR ) = split(/\./,$var);
printf "Sum : %d \n",$VR+$VRR;
Твой случай:
Код:
#!/usr/bin/perl
use strict;
my $var = <STDIN>;
chomp(my ($VR, $VRR) = split(/\./,$var));
printf "Sum : %d \n",$VR+$VRR;
Извиняюсь если неправильно понял, но если суммируем два числа значит они вещественного типа.Ну о красоте я буду думать после окончания написания кода(: Я понял в чём была ошибка:
split(/ \./
Thx
|
|
|