int MAIN() {
  int r;
  float area;
  float rem;
  write("Enter an Integer :");
  r = read();
  area = calarea(r);
  rem = area - floor(area);
  write(area);
  write(" ");
  write(rem);
  write("\n");
  return 0;
}


x86 assembly (clang, -O0):
<MAIN>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
lea    0xeb1(%rip),%rdi
mov    $0x0,%al
call   1030 <write@plt>
mov    $0x0,%al
call   1040 <read@plt>
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%edi
mov    $0x0,%al
call   1050 <calarea@plt>
cvtsi2ss %eax,%xmm0
movss  %xmm0,-0x8(%rbp)
movss  -0x8(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,-0x18(%rbp)
movss  -0x8(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
call   1060 <floor@plt>
movaps %xmm0,%xmm1
movsd  -0x18(%rbp),%xmm0
subsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0xc(%rbp)
movss  -0x8(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
mov    $0x1,%al
call   1030 <write@plt>
lea    0xe58(%rip),%rdi
mov    $0x0,%al
call   1030 <write@plt>
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
mov    $0x1,%al
call   1030 <write@plt>
lea    0xe3c(%rip),%rdi
mov    $0x0,%al
call   1030 <write@plt>
xor    %eax,%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<MAIN>:
sub    $0x18,%rsp
lea    0xeb5(%rip),%rdi
xor    %eax,%eax
call   1030 <write@plt>
xor    %eax,%eax
call   1040 <read@plt>
mov    %eax,%edi
xor    %eax,%eax
call   1050 <calarea@plt>
cvtsi2ss %eax,%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,0x10(%rsp)
call   1060 <floor@plt>
movsd  0x10(%rsp),%xmm2
movapd %xmm2,%xmm1
subsd  %xmm0,%xmm1
xorps  %xmm0,%xmm0
cvtsd2ss %xmm1,%xmm0
movss  %xmm0,0xc(%rsp)
movapd %xmm2,%xmm0
mov    $0x1,%al
call   1030 <write@plt>
lea    0xe71(%rip),%rdi
xor    %eax,%eax
call   1030 <write@plt>
movss  0xc(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
mov    $0x1,%al
call   1030 <write@plt>
lea    0xe54(%rip),%rdi
xor    %eax,%eax
call   1030 <write@plt>
xor    %eax,%eax
add    $0x18,%rsp
ret

LLVM IR (-O0):
@.str = [19 x i8] c"Enter an Integer :\00"
@.str.1 = [2 x i8] c" \00"
@.str.2 = [2 x i8] c"\0A\00"
define i32 @MAIN() {
%1 = alloca i32
%2 = alloca float
%3 = alloca float
%4 = call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0))
%5 = call i32 (...) @read()
store i32 %5, i32* %1
%6 = load i32, i32* %1
%7 = call i32 (i32, ...) bitcast (i32 (...)* @calarea to i32 (i32, ...)*)(i32 %6)
%8 = sitofp i32 %7 to float
store float %8, float* %2
%9 = load float, float* %2
%10 = fpext float %9 to double
%11 = load float, float* %2
%12 = fpext float %11 to double
%13 = call double @llvm.floor.f64(double %12)
%14 = fsub double %10, %13
%15 = fptrunc double %14 to float
store float %15, float* %3
%16 = load float, float* %2
%17 = fpext float %16 to double
%18 = call i32 (double, ...) bitcast (i32 (...)* @write to i32 (double, ...)*)(double %17)
%19 = call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%20 = load float, float* %3
%21 = fpext float %20 to double
%22 = call i32 (double, ...) bitcast (i32 (...)* @write to i32 (double, ...)*)(double %21)
%23 = call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.2, i64 0, i64 0))
ret i32 0
}

LLVM IR (-O2):
@.str = [19 x i8] c"Enter an Integer :\00"
@.str.1 = [2 x i8] c" \00"
@.str.2 = [2 x i8] c"\0A\00"
define i32 @MAIN() {
%1 = tail call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0))
%2 = tail call i32 (...) @read()
%3 = tail call i32 (i32, ...) bitcast (i32 (...)* @calarea to i32 (i32, ...)*)(i32 %2)
%4 = sitofp i32 %3 to float
%5 = fpext float %4 to double
%6 = tail call double @llvm.floor.f64(double %5)
%7 = fsub double %5, %6
%8 = fptrunc double %7 to float
%9 = tail call i32 (double, ...) bitcast (i32 (...)* @write to i32 (double, ...)*)(double %5)
%10 = tail call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%11 = fpext float %8 to double
%12 = tail call i32 (double, ...) bitcast (i32 (...)* @write to i32 (double, ...)*)(double %11)
%13 = tail call i32 (i8*, ...) bitcast (i32 (...)* @write to i32 (i8*, ...)*)(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.2, i64 0, i64 0))
ret i32 0
}