math.via

来自「一个用VB写的很好的编译器,功能超好,不过就是代码有点多,是进一步学习编译的好」· VIA 代码 · 共 19 行

// Math.lnl

application PE GUI entry div.mod; 

import MessageBox ascii lib "USER32.DLL",4; 

frame div.mod();
    local dword x; 
    local dword y; 
    local dword quotient; 
    local dword modulus; 
    local string buffer;

    x=9; y=6; 
    quotient = x/y; modulus = x%y;

    Format(buffer,"%d / %d = %d mod %d",x,y,quotient,modulus);
    MessageBox(0,buffer,"Divide and MOD",0); 
end;