#!/usr/bin/perl

use warnings;
use strict;

print abs(<STDIN>*<STDIN>) . "\n"; # Kontext