User:Matttest/sandbox2

    From TestWiki

    This is a non-official sandbox page, although the original Sandbox page is not official too...

    Test here freely! Don't need to care about whether editing under/below/up/down/over/… any lines. Or just delete the whole page, cover this page with 'webfjhwgfhh', clearing all words or do whatever you like to this page. Of course, as other users can do this too, your edit can always be reverted at any time.

    Warning: Please don’t violate the the edit war policy.

    //This program is for finding HCF for pascal
    //You may delete it if you want as this page is a sandbox
    //Complete the quiz below by replacing ??? to codes
    program hcf;
        var a,b,i:longint;
    begin
        writeln('The two numbers you want to find for HCF: ');readln(a,b);
        while(a<>b)do
        begin
            if(a>b)then ???;
            else b:=???;
        end;
        writeln('HCF: ', ???);
    end.