program Multiply
real::a,b,result
print *,'Enter the first number'
read *,a
print *,'Enter second:'
read *,b
result=a*b
print *,'The result is:',result
end program Multiply
cHJvZ3JhbSBNdWx0aXBseQpyZWFsOjphLGIscmVzdWx0CnByaW50ICosJ0VudGVyIHRoZSBmaXJzdCBudW1iZXInCnJlYWQgKixhCnByaW50ICosJ0VudGVyIHNlY29uZDonCnJlYWQgKixiCnJlc3VsdD1hKmIKcHJpbnQgKiwnVGhlIHJlc3VsdCBpczonLHJlc3VsdAplbmQgcHJvZ3JhbSBNdWx0aXBseQ==