[dovelet] 세자리수 곱셈/three

=dovelet 세자리수 곱셈/three

프로그램 명: three

제한시간: 1 초

(세 자리 수) × (세 자리 수)는 다음과 같은 과정을 통하여 이루어진다.

   472…… (1)

 ×385…… (2)

---------------

  2360…… (3)

 3776 …… (4)

1416  …… (5)

--------------

181720…… (6)

(1)과 (2) 위치에 들어갈 세 자리 자연수가 주어질 때 (3), (4), (5), (6) 위치에 들어갈 값을 구하는 프로그램을 작성하시오.

입력

첫째 줄에 (1)의 위치에 들어갈 세 자리 자연수가, 둘째 줄에 (2)의 위치에 들어갈 세 자리 자연수가 주어진다.

출력

첫째 줄부터 넷째 줄까지 차례대로 (3), (4), (5), (6)에 들어갈 값을 출력한다.

입출력 예

입력

472

385

출력

2360

3776

1416

181720

출처:koi 초등 지역본선 2 번

=cut

# <>=~/(\d+) (\d+)/;print $1*$2;

$a=<>;

<>=~/((\d)(\d)(\d))/;

printf"%d\n%d\n%d\n%d",$a*$4,$a*$3,$a*$2,$a*$1;

? 1 $a=<>;<>=~/((\d)(\d)(\d))/;printf"%d\n%d\n%d\n%d",$a*$4,$a*$3,$a*$2,$a*$1;

이렇게 써서 코드 사이즈를 줄였습니다.