PROGRAM CodeTest;

FUNCTION test : real;
    VAR
        alpha, beta, gamma : real;
        thirty, forty, fifty : integer;
    
    BEGIN
        alpha  := 0;
        beta   := 10;
        gamma  := 20;
        thirty := 30;
        forty  := 40;
        fifty  := 50;
        
        IF forty = fifty
            THEN test := alpha + 3/(beta - gamma) + 5
            ELSE test := alpha + thirty/(beta - gamma) + fifty;
    END;
     
BEGIN
    writeln(test)
END.